Find a sheet within a workbook (If/Then/Else)
 

I have several sheets within a workbook. What I would like the program to do
is search through the sheet names and if there is a sheet name = to
txtName.Value then perform action, otherwise show a message telling the user
the input is not valid. I have already written the "then" and "else" portion
of this code, but I don't have the slightest idea how to have the program
search through the sheets to find the correct one (the "If"). Please help!

Find a sheet within a workbook (If/Then/Else)
 

Maybe something like:

Sub getname()
Set txtName = Sheets("Sheet1").Range("A1")
v = txtName.Value
For Each sh In Sheets
If sh.Name = v Then
MsgBox ("FOUND IT!!")
Exit Sub
End If
Next
MsgBox ("did not find it.")
End Sub


--
Gary''s Student - gsnu200839


"Jacy Erdelt" wrote:

I have several sheets within a workbook. What I would like the program to do
is search through the sheet names and if there is a sheet name = to
txtName.Value then perform action, otherwise show a message telling the user
the input is not valid. I have already written the "then" and "else" portion
of this code, but I don't have the slightest idea how to have the program
search through the sheets to find the correct one (the "If"). Please help!

Find a sheet within a workbook (If/Then/Else)
 

You can do your test this way...

Dim TestName As String
....
On Error Resume Next
TestName = Sheets(txtName.Text).Name
If Err.Number = 0 Then
MsgBox "Exists"
Else
MsgBox "Doesn't exist"
End If

--
Rick (MVP - Excel)


"Jacy Erdelt" wrote in message
...
I have several sheets within a workbook. What I would like the program to
do
is search through the sheet names and if there is a sheet name = to
txtName.Value then perform action, otherwise show a message telling the
user
the input is not valid. I have already written the "then" and "else"
portion
of this code, but I don't have the slightest idea how to have the program
search through the sheets to find the correct one (the "If"). Please help!