シートの表示を移動をしないようにするには

質問

初心者のため、簡単なことかも知れないのですが、ご教授ください。

シート1内にコマンドボタンをつけて、クリックするとシート2のデータを全部クリアする簡単なVBAが実行します。
実行後、シート2が表示されます。

実行した時点でのシート1をそのまま、表示しておくには、どのような
定義が必要ですか？

今は下記のように書いています
Sub ClearCell_1()
'シート名:sheet2のクリア
Worksheets("sheet2").Activate
Worksheets("sheet2").Cells.Clear
End Sub

どなたか教えてください。よろしくお願いします

回答No.2

boro-pc

#1さんに続きまして、或いはActivateそのものをなくせば

Worksheets("sheet2").Activate <- ここを削除するかコメント化する
Worksheets("sheet2").Cells.Clear <- ここだけ残す

Activateの必要性に関してはもう少し勉強してからでいいと思います

お礼

ありがとうございます。

Activateの意味を調べてみます

回答No.1

kokorone

Worksheets("sheet2").Activate
Worksheets("sheet2").Cells.Clear
Worksheets("sheet1").Activate

としてみてください

お礼

ありがとうございます
Activateを調べてみます