VBA Loop

I have the code written for one worksheet but how do I write it so that it will loop through all of the worksheets? With the exception of one worksheet. I want to focus on the name of the worksheet so that my macro doesn't run there. Any help at all would be greatly appreciated!

Dim ws As Worksheet
For Each ws In Worksheets
If ws.Name = "Tested Party" Then GoTo GetNext
Range("G8").Select
ActiveCell.FormulaR1C1 = "2014"
GetNext: Next: End Sub

I would use:

Please Login or Register  to view this content.

that way no need to use the GoTo instruction

Dim ws As Worksheet
For Each ws In Worksheets
If ws.Name = "Tested Party" Then GoTo GetNext
Range("G8").Select
ActiveCell.FormulaR1C1 = "2014"
GetNext: Next: End Sub

JoeFoot,

Thank you for the code, I think I'm close but it's still only running the macro in the sheet i'm currently in. How can I run the macro in every sheet except the sheet named "Tested Party"?

you need to select the sheet at each iteration. This way the code runs on each sheet except "Tested Party"

Please Login or Register  to view this content.

I got it! Thanks so much guys