Copy layout to all worksheets

[Jean-Paul De Winter]

Hi,
I have a workbook with 25 worksheets
The first sheet is my "template"
The question is,
When I change something in the template sheet, layout/color of a cell, with
of a column, validation of a range of cells....I want it to be changed in
all sheets.
How can this be done?
Thanks
JP

 

[Myrna Larson]

You have to Group the sheets before you make the changes. There's more
information in Help. Beware, this can be dangerous if you forget to ungroup
the sheets before you begin to enter data.

 

[keepITcool]

if you select several sheets (or all)
the window caption will change to Myfile.xls [Group]
and the tabs are "highlighted" (white with my scheme)

Then: when you make changes in the activesheet
those changes are made to all (grouped) sheets.

However not all menu's etc are available in grouped mode...
ANd it's easy to forget you are in "grouped mode"
so be careful.

Another alternative is to let the macrorecorder run when you make your
changes....

Review the recorded code then run it on the other sheets.

Sub DoIt()
Dim i%, sProc$
sProc = InputBox("Which macro?", , "Macro1")
If sProc <> "" Then
For i = 2 To Worksheets.Count
Worksheets(i).Activate
Run (sProc)
Next
End If







keepITcool

< email : keepitcool chello nl (with @ and .) >
< homepage: http://members.chello.nl/keepitcool >