Iterating through Excel sheets

问题

Here is my code. I'm new to VBA so, I am unsure how to iterate through multiple pages.

Here's my code:

Dim ws As Worksheet
Sub spellCheck()
For Each ws In ActiveWorkbook.Worksheets
Cells.CheckSpelling
Next
End Sub

回答1:

Try this (this will simply activate each sheet):

Sub spellCheck()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
    ws.Activate
    ' Do stuff...
Next
End Sub

来源：https://stackoverflow.com/questions/12060855/iterating-through-excel-sheets