For each loop in VBA for Excel

[Mattyb33]

I am having a problem with a For Each loop in Excel VBA. I have a workbook with 4 sheets in it. I want to run a particular piece of code for each sheet in the workbook. I currently have the following code:-

Dim current as worksheet

For Each current in Worksheets

MY CODE HERE

Next

When I step through it the next statement doesn't select the next sheet. Can anyone help with this?!?

 

[SkipVought]

Please post VBA questions in forum707 for maximum results.

You need not SELECT anything...

Dim current as worksheet

For Each current in Worksheets
[b]
  With current
    'reference the worksheet here like
    msgbox .name  'to get the worksheet name in the mesage box
  end with
[/b]
Next

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}