Im am receiving the above error with the following code.

Dim iRow As String
Dim CustSSN As String

'Fill variable with User Inputed Cust. SSN
CustSSN = txtCustSSN

iRow = WorksheetFunction.Match(CustSSN
Worksheets("sheet1").Range("f:f300"), 0)
If iRow = 0 Then
MsgBox "Customer SSN Was Not Found"
Else
MsgBox "Record Found"

End If

End Sub

The error is highlighting the first line of the above code

--
Mcastee
-----------------------------------------------------------------------
Mcasteel's Profile: http://www.excelforum.com/member.php...fo&userid=1569
View this thread: http://www.excelforum.com/showthread.php?threadid=27226

Line-wrap?

Dim iRow As String
Dim CustSSN As String

'Fill variable with User Inputed Cust. SSN
CustSSN = txtCustSSN

iRow = WorksheetFunction.Match(CustSSN, _
Worksheets("sheet1").Range("f:f300"), 0)
If iRow = 0 Then
MsgBox "Customer SSN Was Not Found"
Else
MsgBox "Record Found"

End If

End Sub



--

HTH

RP

"Mcasteel" wrote in message
...

Im am receiving the above error with the following code.

Dim iRow As String
Dim CustSSN As String

'Fill variable with User Inputed Cust. SSN
CustSSN = txtCustSSN

iRow = WorksheetFunction.Match(CustSSN,
Worksheets("sheet1").Range("f:f300"), 0)
If iRow = 0 Then
MsgBox "Customer SSN Was Not Found"
Else
MsgBox "Record Found"

End If

End Sub

The error is highlighting the first line of the above code.


--
Mcasteel
------------------------------------------------------------------------
Mcasteel's Profile:
http://www.excelforum.com/member.php...o&userid=15698
View this thread: http://www.excelforum.com/showthread...hreadid=272267