|| Macro in userform | Help ||

Hi all...

Am trying to create a purchase order form, whereby users can add their own contact. I've created a userform for this, but already have an existing table of fields, so I think the error message is related to where the new field is trying to be entered.

Included is full file, any help would be greatly appreciated!

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

'find first empty row in database
iRow = ws.Cells.Find(What:="*", SearchOrder:=xlRows, _ SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1"

* ' find first empty... * is the error command.

Regards :-)