Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Looping Through Names
Something like
For Each sh In activeworkbook.Worksheets sh.Range("A1").Value = "This is currently sheet #: " & sh.Index Next sh -- HTH ------- Bob Phillips "The Wonder Thing" wrote in message ... Hello All. Just wondering if there's a simpler way to do loop through a bunch of names. Say the names of various worksheets. Right now I use: Do While mySheetIndex <= 5 mySheetIndex = mySheetIndex +1 If mySheetIndex = 1 Then mySheet="Worksheet Name 1" If mySheetIndex = 2 Then mySheet="Worksheet Name 2" If mySheetIndex = 3 Then mySheet="Worksheet Name 3" If mySheetIndex = 4 Then mySheet="Worksheet Name 4" If mySheetIndex = 5 Then mySheet="Worksheet Name 5" Worksheets(mySheet).Range("A1").Value = "This is currently sheet #: " & mySheetIndex Loop I have to use the worksheet names, because they do get moved around a bit. And of course I generally have a lot more code I want to execute per sheet than just that one line. I was thinking something along the lines of an array that contained all the names of the sheets I wanted to target (because there are some I don't want to), and then I could just define the array up at the begginning and do something like: For each sht in ActiveWorkbook.Worksheets If sht.Name Like [One of the values in mySheetArray] Then Worksheets(sht).Range("A1").Value = "This sheet.... etc." End If Next But I can't get it to work. Anyways, thanks in advance for your help! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
converting email address names in a range of cells to real names | Excel Worksheet Functions | |||
using the Excel generic worksheet names instead of user-given names in code | Excel Discussion (Misc queries) | |||
Sorting and matching rows of names with Socials with master list and eliminating the extra names | Excel Worksheet Functions | |||
Looping Through Names | Excel Programming | |||
Change names of files in a folder to match names in Excel Column | Excel Programming |