Search function for a workbook
This is still pretty general in terms of detail. are there specific columns or sheets with part numbers vs. descriptions?..that kind of stuff. So, you will get a generic Search function
Create a textbox and a command button on a new shee
Name The New sheet 'SearchSheet" or whaterver you want just adjust code to match
in the Click Code for the command button put thi
Private Sub CommandButton1_Click(
Dim x as Range, Sh as Rang
For Each Sh In Sheet
If Sh.Name = "SearchSheet" then Goto NextShee
Set x = Sh.Cells.Find(What:=TextBox1.text, LookAt:=xlWhole, MatchCase:=False
If Not x Is Nothing The
Sh.Selec
x.Selec
Exit Su
End I
NextSheet
Next S
End Sub
----- brian wrote: ----
Sorry, about that
Here is more detail
I would like it to jump to the location if the part number
is found.
I don't know if this will work for the description as some
description can be similiar, any suggestions for this
part, maybe just the worksheet/cell locations of matching
results
Part numbers are mainly numeric but can be alpha-numeric
Descriptions are text only
Hope this helps
-----Original Message----
please provide more detail. what do you want returned, if
it exist or where its located? what format is your data
in?. how is your workbook setu
----- brian wrote: ----
First, thanks for all the great help
Here is my situation
I have an inventory workbook that I want to add a
search
page to. I would like to actually have 2 separate
search
boxes, one to search by part number and the second
to
search by description
Hope this is an easy one
Thanks
Bria
|