• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 335
  • Last Modified:

Edit macro to allow for worksheets in Active workbook

Hi Expert's

how would I amend the following vba


Sub calcSheets() Dim WS_Count As Integer Dim I As Integer ' Set WS_Count equal to the number of worksheets in the active ' workbook. WS_Count = ActiveWorkbook.Worksheets.Count ' Begin the loop. For I = 1 To WS_Count ActiveWorkbook.Worksheets(I).EnableCalculation = False ActiveWorkbook.Worksheets(I).EnableCalculation = True Next I End Sub

so ws count corresponds to 7 worksheets. ..
0
route217
Asked:
route217
1 Solution
 
NorieVBA ExpertCommented:
You can't change the count of worksheets unless you delete or add worksheets.

If you only want to loop through the first 7 worksheets use this.
For I =1 To 7

Open in new window


If it's 7 specific worksheets you want to work with we'll need more information.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Cloud Class® Course: Python 3 Fundamentals

This course will teach participants about installing and configuring Python, syntax, importing, statements, types, strings, booleans, files, lists, tuples, comprehensions, functions, and classes.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now