excel runtime 1004

[lmnorms1]

I am putting a front end on an excel worksheet. I got the basics input
and I am testing it with one field. I get a runtime error of 1004.
Application-defined or Object-define error.

Here is my code:
Private Sub cmdAdd_Click()

Dim iRow As Long
Dim ws As New Worksheet
Set ws = Worksheets("MayerInsInfo")

'find the first row in the sheet
iRow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(2, 0)

'copy the data to the database
ws.Cells(iRow, 2) = Me.txtFName.Value <-- highlights with error.

End Sub


Any suggestions would be greatly appreciated.
(e-mail address removed)

 

[Norman Jones]

Hi lmnorms1,

Try changing:

iRow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(2, 0)

to

iRow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(2, 0).Row

 

[lmnorms1]

Thank you that worked.