Macro to format all worksheets

[chumley]

Hi,

I'm looking to write a macro that will perform some simple formatting to every worksheet in a workbook. The problem I face is that the number of worksheets can vary from 1 to 200 and the names of the worksheets are also variable.

I have no clue how to go about this, could someone help me out please?

Thanks in advance.

 

[chumley]

Works a treat, thanks very much for your help!

 

[markmzz]

Works a treat, thanks very much for your help!

Chumley,

Thanks for the feedback.

Markmzz

 

[chumley]

Hi,

I'd like to add to this macro by including a command to unprotect each of the worksheets. I've tried adding "ActiveSheet.Unprotect" which didn't work.

Could someone please advise what I need to use instead?

 

[markmzz]

Hi,

I'd like to add to this macro by including a command to unprotect each of the worksheets. I've tried adding "ActiveSheet.Unprotect" which didn't work.

Could someone please advise what I need to use instead?

Chumley,

Try this:

    For Each ws In ActiveWorkbook.Worksheets
        With ws
            '
            '
[COLOR=blue][B]           .Unprotect[/B][/COLOR]

Markmzz