Loop thru sheets with particular name format
Hi all,
I need a way to be able to loop between sheets that names are in the following format: ##-##-####
where # represents any number.
The sheet names are dates and my workbook contains other worksheets i want to exclude from this loop
any help would be appreciated!
cheers
Maybe try this (untested):
For s = 1 to Sheets.Count If Sheets(s).name like "*" & "-" & "*" & "-" & "*" Then Msgbox Sheets(s).name Next
Please consider:
Thanking those who helped you. Click the star icon in the lower left part of the contributor's post and add Reputation.
Cleaning up when you're done. Mark your thread [SOLVED] if you received your answer.
This slightly different approach will test if almost any date format has been used and properly identify them all, even if they differ:
12-12-2012
1-1-11
May 2012
Sub NameTest() Dim ws As Worksheet For Each ws In Worksheets If IsDate(CStr(ws.Name)) Then MsgBox ws.Name Next ws End Sub
_________________
Microsoft MVP 2010 - Excel
Visit: Jerry Beaucaire's Excel Files & Macros
If you've been given good help, use theicon below to give reputation feedback, it is appreciated.
Always put your code between code tags. [CODE] your code here [/CODE]
?None of us is as good as all of us? - Ray Kroc
?Actually, I *am* a rocket scientist.? - JB (little ones count!)
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks