Logo 
Search:

MS Office Answers

Ask Question   UnAnswered
Home » Forum » MS Office       RSS Feeds
  Question Asked By: Leon Hansen   on Dec 14 In MS Office Category.

  
Question Answered By: Helene Stewart   on Dec 14

This should do it

Option Explicit

Sub formatSheets()

Dim x
Dim y

x = Worksheets.Count

While x > 1

Worksheets(x).Activate
Format1
doevents
x = x - 1
Wend
Application.Worksheets(x).Activate
format2

End Sub

Share: 

 

This Question has 7 more answer(s). View Complete Question Thread

 
Didn't find what you were looking for? Find more on Simple Macro to Format All Sheets in a Workbook? Or get search suggestion and latest updates.


Tagged: