プロが教えるわが家の防犯対策術!

下記のマクロを実行するとチェックボックスに「✔」が入るように設定しましたが、
エラーは出ませんが、
「✔」が表示されません。
なお、チェックボックス名は「CheckBox51」と表示されております。
又、その他のチェックボックスを指定すると
例えば「.CheckBoxes(313)を設定すると
エラー「1004」が表示されます。
私の希望はマクロを実行して指定のチェックボックスに「✔」を表示させたいのですが、
解決方法を教えてください。
現状のマクロ
Sub Macro1()

With ActiveSheet
.CheckBoxes(51).Value = True
End With

End Sub
宜しくお願い致します。

A 回答 (2件)

フォームの場合


ActiveSheet.CheckBoxes("Check Box 1").Value = xlOn

activexコントロールの場合はプロパティのlinkedcellにセル番地を書いて
そこを指定する。

かな
    • good
    • 0
この回答へのお礼

回答ありがとうございました。
上手くできました。

お礼日時:2024/04/04 11:16

Application.ScreenUpdating = True


をどこかに追加するといいかも。
    • good
    • 0
この回答へのお礼

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

お礼日時:2024/04/04 06:05

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています


このQ&Aを見た人がよく見るQ&A