Thread: Populate TextBox from ListBox
View Single Post
 
Old 07-04-2018, 06:27 AM
NoSparks NoSparks is offline Windows 7 64bit Office 2010 64bit
Excel Hobbyist
  
Join Date: Nov 2013
Location: British Columbia, Canada
Posts: 842
NoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of light
Default
Code:
Private Sub ListBox1_Click()
Me.TextBox1.Value = Application.WorksheetFunction.VLookup(ListBox1.Value, Range("B2:E3"), 3, False)
End Sub
Reply With Quote