Billy,

I'm not quite sure what it is you are trying to do.

Do you want a combo/list box for the user to select the course?

If so it may be easier to use auto filter on the table as the user can pull
that down.

Please explain a little more.

--
Hope this helps
Martin Fishlock, Bangkok, Thailand
Please do not forget to rate this reply.


"Billy B" wrote:

I have figured out how to search rows in a worksheet and display only rows
that contain text that matches the users input (the code is below). What I am
not able to figure out is how to display rows with text containing text that
the user inputs into the inputbox. I tried putting the * in front of the text
in the inputbox but that does not work. Any help would be greatly appreciated.

Dim r As Range
ActiveWorkbook.Worksheets(1).Range("A1").Select
v = UCase(Application.InputBox("Enter Course Number:", "Course", Type:=2))
Rows.Range("Courses").EntireRow.Hidden = True

For Each r In ActiveSheet.UsedRange
If InStr(r.Value, v) < 0 Then
Rows(r.Row).EntireRow.Hidden = False
End If
Next
Cells(1, 1).Select
End Sub