View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Rick Rothstein Rick Rothstein is offline
external usenet poster
 
Posts: 5,934
Default Data from Combo Box

Add this event procedure to your UserForm's code window...

Private Sub Cb2_Click()
Tb1.Text = Cb2.Column(1)
Tb2.Text = Cb2.Column(2)
End Sub

--
Rick (MVP - Excel)


"Sue" wrote in message
...
Hi all

I got the following code off this forum

Private Sub UserForm_Initialize()
Cb2.List = ActiveSheet. _
Range("A2:C200").Value
End Sub

ComboBox Cb2 displays the info when opened
e.g. Name | Sex | DOB

I have two textboxes on the Userform
Tb1 & Tb2
I need Tb1 & Tb2 to fill with the data from Cb2

Sex | DOB

Everytime I click on a different name - it they will change automatically
I can then add them to a new sheet Named "Correct" in Cols E & F
respectively
been at it a couple of hours and I need you experts to guide me


--
Many Thanks

Sue