Excel search engine help

[martfarm]

Hi all new to this site very helpful it has been, im using 2007 created a data sheet so i can enter data into column a,b,c,d and have made a searh engine to search for results, the problem im having is it only searches the column A SO IT GIVES ME THE LAST ENTRY OF WHAT I AM SEARCHING FOR, I NEED IT TO SEARCH COLUMN B as well to give me the result of C & D here is the code on the search button i need another string of commands to make it search B can anyone help thanks Martin

Private Sub CommandButton1_Click()
row_number = 0
Do
DoEvents
row_number = row_number + 1
item_in_review = Sheets("PartsData").Range("A" & row_number)
If item_in_review = TextBox1.Text Then
TextBox2.Text = Sheets("PartsData").Range("B" & row_number)
TextBox3.Text = Sheets("PartsData").Range("c" & row_number)
TextBox4.Text = Sheets("PartsData").Range("D" & row_number)
End If


Loop Until item_in_review = ""

End Sub

[Chris 53]

You have an if statement. If item_in_review = TextBox1.Text Then It looks like this is not true so the other columns won't be read.

Chris

[martfarm]

Hi thanks, so what would you suggest I do im very new to excel so could do with as much help as poss thks for your time.

[Chris 53]

Try deleting the "If item_in_review = TextBox1.Text Then" and the "End if"
Try it before you save the workbook with the same name.

It looks like it is just stopping you doing what you want it to, but it could be there for a reason of which I'm unaware.

Chris

[martfarm]

Hi tried that didnt work get no results in box3/4