1
アクティブなワークシート間で変更するマクロを、一定の時間が経過した後に書き込もうとしています。VBAを使用して、アクティブなワークシート間を切り替えるだけです
私はいくつかの隠れたシートを持っていますが、現在、このコードは私に最後に表示されたシートに私を回し、隠されたシートを循環させるのと同じ時間だけシートを一時停止します。だから私は最後の目に見えるシートを他のシートより数倍長く見てしまいます。
これは私のコードです。
Public Sub Switch()
Dim ws As Worksheet
Do
For Each ws In ThisWorkbook.Worksheets
ws.Activate
Application.Wait Now() + TimeValue("00:00:05")
DoEvents
Next ws
Loop
End Sub
何か助けが素晴らしいだろう!
ため 'DoEvents'は何ですか? – BruceWayne
それでした!どうもありがとうございます。 –
@ BruceWayne - なぜOPにはそれがあったのか分かりませんが、私はそれを取り除くことに気にしませんでした – YowE3K