search function
 

I have a list of 500 movies and i want to have a "search" box to search my
list for a specific movie by entering a partcial name.

search function
 

hi
Ctrl+f will bring up the find box.
or click on the icon that looks like a pair of binoculars.
or on the 2003 menu bar....
editfind.

regards
FSt1

"Gary" wrote:

I have a list of 500 movies and i want to have a "search" box to search my
list for a specific movie by entering a partcial name.

search function
 

You could get more than one movie that way, but try this. Assuming the
movie name is "Casablanca" and the list is in column A.

Sub getit()
lr = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
Set rng = Range("A2:A" & lr)
For Each c In rng
If c.Value Like "*blanc*" Then
MsgBox "The movie is " & c.Value
Exit For
End If
Next
End Sub





"Gary" wrote in message
...
I have a list of 500 movies and i want to have a "search" box to search my
list for a specific movie by entering a partcial name.