Excel VBA質問箱 IV

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

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


25580 / 76732 ←次へ | 前へ→

【56490】Re:コマンドボタン
回答  mizunu  - 08/6/19(木) 11:42 -

引用なし
パスワード
   >有れば教えてください。コマンドボタンを押す。又はOKボタンを押す。と云う命令語はあるのでしょうか。

シートのCommandButtonであれば以下で
コマンドボタンを押す、つまりクリックイベントを発生させます。
Sheet1.CommandButton1.Value = True

(ヘルプより)
コマンド ボタン (CommandButton) コントロールでは、マクロまたはプロシージャを通じて Value プロパティに真 (True) を設定すると、Click イベントが発生します。

直にプロシージャを実行(クリックイベントを発生させてはいない)
しても結果は同じなんですが...

ただ、Clickイベントを発生させる方法だと、
CommandButtonをオブジェクトとして扱う事が出来ます。
以下一例

Sub test_CommandButtonValueTrue()
 Dim cb1 As MSForms.CommandButton
 Set cb1 = Sheet1.CommandButton1
 '
 cb1.Value = True 'Clickイベントを発生させる
End Sub

0 hits

【56479】コマンドボタン トキノハジメ 08/6/18(水) 21:10 質問
【56480】Re:コマンドボタン マクロマン 08/6/18(水) 21:24 発言
【56481】Re:コマンドボタン トキノハジメ 08/6/18(水) 22:06 質問
【56485】Re:コマンドボタン マクロマン 08/6/19(木) 9:35 発言
【56490】Re:コマンドボタン mizunu 08/6/19(木) 11:42 回答
【56561】Re:コマンドボタン トキノハジメ 08/6/21(土) 9:16 お礼

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