Runtime error: 438. My Userform Code wont work. Please check what 'm doing wrong...

[pedie]

It errors in underlined line.

[/FONT]
[FONT=Courier New]Private Sub Update_Click()
 Dim x As String
 x = Me.PathCtxt.Value
 
[B][U] If Application.WorksheetFunction.Right(x, 1).Value = "/" Then[/U][/B]
    Sheets("AList").Range("D1").Value = x
    Call Makeinvis
 Else
    Sheets("AList").Range("D1").Value = x & "\"
 End If
End Sub

 

[mikerickson]

There is a VBA function Right, there is no Application.WorksheetFunction.Right

 

[pedie]

Mike, Thanks alot! please advice on how can i determine if the text entered in userform textbox is ending with "\"?

Thanks again

 

[pedie]

Sorry, my bad.... i was using ".value" that was the prob.
Thanks everyone, thanks Mike!