Private Sub CommandButton2_Click()

Sheets("Score Card Calculator").Select
    Range("S31").Select
Sheets("ScoreRecords").Select
Range("S31").Select

End Sub

I know I'm a bit of a dunce at writing code, but the above is simple stuff, however I keep getting the error message.

Run time error 1004
Application defined or object defined error.

I just need to carry cell info on one sheet to a cell on another sheet??

Help

Ken

This error happens when there is no Workbook open in the XL application.

You can check using the following code

If ActiveWorkbook Is Nothing Then
    MsgBox "Macro will work on open workbooks!", vbInformation
    End
End If

Cheers,
Shasur

http://www.vbadud.blogspot.com