提出前の整形にご使用ください。
Sub CursorA1()
'
' CursorA1 Macro
'
Dim Ws As Worksheet
For Each Ws In Worksheets
Ws.Activate
Range("A1").Select
Next Ws
Worksheets(1).Activate
ActiveWorkbook.Save
End Sub
Go to list of users who liked
Share on X(Twitter)
Share on Facebook
More than 3 years have passed since last update.
提出前の整形にご使用ください。
Sub CursorA1()
'
' CursorA1 Macro
'
Dim Ws As Worksheet
For Each Ws In Worksheets
Ws.Activate
Range("A1").Select
Next Ws
Worksheets(1).Activate
ActiveWorkbook.Save
End Sub
Register as a new user and use Qiita more conveniently
Go to list of users who liked