エクセルのマクロについて教えてください。

下記のマクロは以前、教えて頂いたマクロで、マクロを実行すると
チェックボックスに「✔」が入ります。
そのマクロはアクティブシートのチェックボックスに「✔」が付きますが、
アクティブシートでは無く、シートを指定できる方法を教えてください。
指定シート名「建築物（完了検査）（第4号様式）」です。
宜しくお願い致します。
現状のマクロ
Sub 特例1号チェック()
With ActiveSheet

ActiveSheet.CheckBoxes("Check Box 51").Value = xlOn
ActiveSheet.CheckBoxes("Check Box 60").Value = xlOn



End With

End Sub
以上になります。
宜しくお願い致します。

No.2 ベストアンサー 回答者： kigoshi 回答日時： 2024/04/11 12:32

せっかくWithの使い方を学んだのですから（学んだのでしょ？）このようにしてはいかがでしょう。

With Sheets("建築物（完了検査）（第4号様式）")
.CheckBoxes("Check Box 51").Value = xlOn
.CheckBoxes("Check Box 60").Value = xlOn
End With

この回答へのお礼

お礼日時：2024/04/11 15:50

No.3 回答者： 高木さんWIN 回答日時： 2024/04/11 15:08

過去の質問において、

・WorkBooks("ブック名")
・Worksheets("シート名") 又は Sheets("シート名")
を幾度も使用して来た（回答を貰った？）のでは？

その経験を活かしていきましょう。

この回答へのお礼

お礼日時：2024/04/11 15:50

No.1 回答者： zongai 回答日時： 2024/04/10 17:57

こちらでどうでしょう

Sheets("建築物（完了検査）（第4号様式）").CheckBoxes("Check Box 51").Value = xlOn
Sheets("建築物（完了検査）（第4号様式）").CheckBoxes("Check Box 60").Value = xlOn

この回答へのお礼

回答ありがとうございます。
早速試させて頂きます。

お礼日時：2024/04/10 18:00