run on all sheets

[sl1990]

in the same way you can use

call macro_1
call macro_2
call macro_3

to run macros in order on a sheet is there a similar way to say

run macro_1 on all sheets ?

 

[Nalani]

Maybe this:

Sub Macro_1
 
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
 
///  Your Macro_1 code here ///

    Next ws
 
End Sub

 

[jeffreybrown]

If I could, would like to add to the solution already offered.

Notice after the For Each statement, the action is prefaced by ws. If this was not the case the procedure to unprotect would not happen on all sheets.

Sub ProtectIt()
    Dim ws As Worksheet
    For Each ws In Worksheets
        [COLOR="Red"]ws.[/COLOR]Unprotect "password"
    Next ws
End Sub

 

[Nalani]

Jeff,
Did I miss something about the OP's sheets being protected?

I looked at the OP's history of posts, and it seems his posts all relate to his project at hand. But I didn't see anything about Protected Sheets.

Just curious if that was a "fail safe" just in case.

 

[jeffreybrown]

Hi Nalani,

No you did not miss anything, I just showed and example just to illustrate when applying a macro to all spreadsheets you need to use the variable.

I've been caught by this many a time.

 

[Nalani]

I've been caught by this many a time.

Me too.....That and the blasted . period .....

It probably would help to see the OP's 3 Macros - might not need all three??