Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


6117 / 76734 ←次へ | 前へ→

【76219】動的checkbox
質問  no  - 14/10/17(金) 11:15 -

引用なし
パスワード
   Option Explicit
Private cbox As MSForms.CheckBox

Private Sub UserForm_Initialize()

Set cbox = Controls.add("Forms.CheckBox.1", "MyCheckBox01")
   With cbox
    .Caption = "selection"
    .Height = 14: .Left = 2: .Top = bk * j + 2: .Width = 60
   End With

Set cbox = Nothing

End Sub


checkboxがchangeした時にmsgを出したいのですが。

Private Sub cbox_Change()
  MsgBox "ok"
End Sub

動きません。
どうしたらいいですか?

1 hits

【76219】動的checkbox no 14/10/17(金) 11:15 質問
【76223】Re:動的checkbox とおりすがり 14/10/17(金) 16:20 回答
【76226】Re:動的checkbox ichinose 14/10/17(金) 18:21 発言
【76245】Re:動的checkbox [名前なし] 14/10/20(月) 16:31 お礼[未読]
【76251】Re:動的checkbox hello help 14/10/21(火) 12:00 質問[未読]
【76256】Re:動的checkbox とおりすがり 14/10/21(火) 22:39 回答[未読]
【76257】Re:動的checkbox hello help 14/10/22(水) 10:25 お礼[未読]

6117 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free