3

これが私のコードです。私は VBA が初めてなので、複数のページを反復処理する方法がわかりません。

これが私のコードです:

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

1 に答える 1

5

これを試してください(これにより、各シートがアクティブになります):

Sub spellCheck()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
    ws.Activate
    ' Do stuff...
Next
End Sub
于 2012-08-21T18:34:48.397 に答える