Thread: Apply Macro to all worksheets in a workbook except one
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.misc
Mike H Mike H is offline
external usenet poster
  
Posts: 11,501
Default Apply Macro to all worksheets in a workbook except one
Hi,

Sub Apply_to_all_sheets()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
If ws.Name < "Sheet1" Then
Call begin
End If
Next
End Sub

Mike

"Carrie_Loos via OfficeKB.com" wrote:

Is there a way to include an exception to this macro so that it excludes
Sheet1??

Sub Apply_to_all_sheets()

For Each ws In Worksheets
Call Begin
Next
End Sub

Thanks for any help
Carrie

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...excel/200901/1


Reply With QuoteReply With Quote