Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

31905 / 76734

←次へ　｜　前へ→


	【50072】Re:チェックボックスの値をFor文を用いて取得したい

ichinose - 07/7/7(土) 18:59 -


	引用なし

	パスワード

▼VBA_edu さん：
こんばんは。

>チェックボックスの「Value」の値を取得する為のマクロを作成しています．
>一般的には，『チェックボックス名.Value』と個々に定義しますが，
たぶん、コマンドバ－「コントロールツールボックス」のチェックボックス
の事だと思いますが、シートに貼り付け可能なコントロールには
コマンドバー「フォーム」のものと「コントロールツールボックス」のものと
あるので、きちんと明記してください。

Sub main()
　　Dim g0 As Long
　　With ActiveSheet
　　　 For g0 = 1 To 5
　　　　　MsgBox .OLEObjects("checkbox" & g0).Object.Value
　　　　　'　　　　　　　　　　　↑命名したオブジェクト名
　　　　　Next
　　　 End With
End Sub

1 hits

▼

【50070】チェックボックスの値をFor文を用いて取得したい VBA_edu 07/7/7(土) 13:53