VBA cell to textbox

  • Thread starter Thread starter gwoodby
  • Start date Start date
G

gwoodby

I'm having an issue if anyone could help.
I'm very new to VB/VBA and I'm trying to Search a spreadsheet for
specific text in column A,
when it finds that data make the cell that data is in the Active
cell , then move to column b the same row the data was on and select
the text there, Then paste it to a textbox, then it would have to go
to column d and do the same, How would i go about doing this?
 
Make TextBox1, TextBox2 and TextBox3 on a Form
Doubleclick on TextBox1
Insert folowing code except first and last line :

Start Form and put searc value in TextBox1


Private Sub TextBox1_Change()
On Error Resume Next
Me.TextBox2 = "": Me.TextBox3 = ""
Me.TextBox2 = Range("A1:A10").Find(Me.TextBox1, LookIn:=xlValues).Offset(0, 1)
Me.TextBox3 = Range("A1:A10").Find(Me.TextBox1, LookIn:=xlValues).Offset(0, 3)
End Sub


"(e-mail address removed)" skrev:
 
Make TextBox1, TextBox2 and TextBox3 on a Form
Doubleclick on TextBox1
Insert folowing code except first and last line :

Start Form and put searc value in TextBox1

Private Sub TextBox1_Change()
On Error Resume Next
Me.TextBox2 = "": Me.TextBox3 = ""
Me.TextBox2 = Range("A1:A10").Find(Me.TextBox1, LookIn:=xlValues).Offset(0, 1)
Me.TextBox3 = Range("A1:A10").Find(Me.TextBox1, LookIn:=xlValues).Offset(0, 3)
End Sub

"(e-mail address removed)" skrev:




- Show quoted text -
Click to expand...

You have made it work THANK YOU!!!!
 
Back
Top