Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
selecting sheets
Hi
I have named 3 sheets. I want to do a "for each" statement but i am missing something. see below For Each s In ThisWorkbook.Worksheets(wsPLimagine, wsPLos, wsPLcurrency) any ideas thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
selecting sheets
Kevin,
I am not sure what you are trying to do, access the 3 sheets, or name them, but the for Next loop should look like For Each s In ThisWorkbook.Worksheets MsgBox s.Name 'just as an example Next s You cannot do a For next on an array of sheet names as you seem to be trying to do, but only on the whole collection. You could test within the loop, like so For Each s In ThisWorkbook.Worksheets If s.Name = wsPLimagine Or s.Name = wsPLos Or s.Name = wsPLcurrency Then ' do your stuff End If Next s -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "kevin" wrote in message ... Hi I have named 3 sheets. I want to do a "for each" statement but i am missing something. see below For Each s In ThisWorkbook.Worksheets(wsPLimagine, wsPLos, wsPLcurrency) any ideas thanks |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
selecting sheets
Bob/Kevin
This works for me....... Public Sub lookat() For Each s In ThisWorkbook.Sheets(Array("Sheet1", "Sheet2", "Sheet3")) MsgBox s.Name 'just as an example Next s End Sub Gord Dibben XL2002 On Thu, 27 Nov 2003 21:34:15 -0000, "Bob Phillips" wrote: Kevin, I am not sure what you are trying to do, access the 3 sheets, or name them, but the for Next loop should look like For Each s In ThisWorkbook.Worksheets MsgBox s.Name 'just as an example Next s You cannot do a For next on an array of sheet names as you seem to be trying to do, but only on the whole collection. You could test within the loop, like so For Each s In ThisWorkbook.Worksheets If s.Name = wsPLimagine Or s.Name = wsPLos Or s.Name = wsPLcurrency Then ' do your stuff End If Next s |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
selecting sheets
Thanks Bob - thats works fine - i was trying to access the
3 sheets cheers -----Original Message----- Kevin, I am not sure what you are trying to do, access the 3 sheets, or name them, but the for Next loop should look like For Each s In ThisWorkbook.Worksheets MsgBox s.Name 'just as an example Next s You cannot do a For next on an array of sheet names as you seem to be trying to do, but only on the whole collection. You could test within the loop, like so For Each s In ThisWorkbook.Worksheets If s.Name = wsPLimagine Or s.Name = wsPLos Or s.Name = wsPLcurrency Then ' do your stuff End If Next s -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "kevin" wrote in message ... Hi I have named 3 sheets. I want to do a "for each" statement but i am missing something. see below For Each s In ThisWorkbook.Worksheets(wsPLimagine, wsPLos, wsPLcurrency) any ideas thanks . |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
selecting sheets
Kevin,
Have you also seen Gord's response, it is more aligned to your original idea? -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "KEVIN" wrote in message ... Thanks Bob - thats works fine - i was trying to access the 3 sheets cheers -----Original Message----- Kevin, I am not sure what you are trying to do, access the 3 sheets, or name them, but the for Next loop should look like For Each s In ThisWorkbook.Worksheets MsgBox s.Name 'just as an example Next s You cannot do a For next on an array of sheet names as you seem to be trying to do, but only on the whole collection. You could test within the loop, like so For Each s In ThisWorkbook.Worksheets If s.Name = wsPLimagine Or s.Name = wsPLos Or s.Name = wsPLcurrency Then ' do your stuff End If Next s -- HTH Bob Phillips ... looking out across Poole Harbour to the Purbecks (remove nothere from the email address if mailing direct) "kevin" wrote in message ... Hi I have named 3 sheets. I want to do a "for each" statement but i am missing something. see below For Each s In ThisWorkbook.Worksheets(wsPLimagine, wsPLos, wsPLcurrency) any ideas thanks . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Selecting / UnSelecting sheets | Excel Discussion (Misc queries) | |||
Selecting sheets - II | Excel Discussion (Misc queries) | |||
Selecting sheets | Excel Discussion (Misc queries) | |||
Changing the value in multiple sheets without selecting those sheets | Excel Programming | |||
selecting sheets | Excel Programming |