VBA Vlookup

[josros60]

Hi,

I have Userform with textboxes 16 and 17

how can I use vlookup than when type the G/L code in textbox16 get G/L description which is in sheet named CHART_AC
which have two columns that are A = ACCOUNT NUMBER, B = DESCRIPTION.

Thank you,

 

[josros60]

Any help please?

 

[NoSparks]

I'd use .Find instead of VLookup

Private Sub TextBox16_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
'check that what was typed in exists in CHART_AC column A
With Me.TextBox16
    If .Value <> "" Then
        If Sheets("CHART_AC").Range("A:A").Find(.Value, LookIn:=xlValues, Lookat:=xlWhole) Is Nothing Then
            MsgBox "The value entered does not exist"
            'keep focus in textbox16
            Cancel = True
            'highlight what's in the textbox
            .SelStart = 0
            .SelLength = Len(.Text)
        End If
    End If
End With
End Sub

Private Sub TextBox16_AfterUpdate()
'populate textbox17 according to textbox16
TextBox17 = Sheets("CHART_AC").Range("A:A").Find(TextBox16.Value, LookIn:=xlValues, Lookat:=xlWhole).Offset(, 1).Value
End Sub

 

[josros60]

It worked perfectly.

Thank you so much.

 

[smozgur]

It worked perfectly.

Thank you so much.

I switched the marked solution post as confirmed. For your future questions, please mark the post that answered the question instead of your feedback post to help future readers. Thanks.