View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Chris Chris is offline
external usenet poster
 
Posts: 244
Default 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