Vlookup in VBA

[zdodson]

I have two textboxes, and a range:

Textbox Names:
txtArea
txtPerimeter

Range: (A2:B100)

I want txtArea to populate txtPerimter based on the value that I put in txtArea using vlookup.

Pretty basic, just having a difficult time with it, and I can't find anything on the internet that speaks to the specificity of this request.


Thanks,
Zack

 

[Rick Rothstein]

See if this macro works for you...

Sub UpdatePerimeterFromArea()
  On Error Resume Next
  ActiveSheet.txtPerimeter.Value = Columns("A").Find(ActiveSheet.txtArea.Value, LookAt:=xlWhole, _
                                                     MatchCase:=False).Offset(, 1).Value
  On Error GoTo 0
End Sub

 

[zdodson]

Where do you put this code? Do you put it behind the userform or the textbox?

 

[Rick Rothstein]

Where do you put this code? Do you put it behind the userform or the textbox?

The code should go in the UserForm's module, but how you call it depends on how your UserForm is structured and how the user is supposed to interact with it. If you have a "Done" or "Next" type button, I would call the macro from its Click event. If you want the code to execute when the user has left the TextBox, then you can call the macro from the TextBox's LostFocus event. There are probably a few other possible scenarios as well, so again, the answer is "it depends".