If Sheet Name, No Action
Ryan
Try the Like operator; maybe something like:
Sub test3()
For Each sh In Sheets
If sh.Name Like "Sh*" Then MsgBox sh.Name
Next sh
End Sub
Good luck.
Ken
Norfolk, Va
On Jun 12, 3:49*pm, ryguy7272
wrote:
Is there an easier way to do this:
If (sh.Name) < "SH1 - Ryan" Then
If (sh.Name) < "SH1 - Jimmy" Then
If (sh.Name) < "SH1 - Tim" Then
If (sh.Name) < "SH1 - Todd" Then
If (sh.Name) < "SH1 - Frank" Then
If (sh.Name) < "SH1 - Susie" Then
Something like this:
If (sh.Name) < "SH1 - *" Then
(but this does not work…)
Regards,
Ryan---
--
RyGuy
|