Excel VBA質問箱 IV

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

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


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

31907 / 76734

←次へ　｜　前へ→


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

VBA_edu - 07/7/7(土) 13:53 -


	引用なし

	パスワード

チェックボックスの「Value」の値を取得する為のマクロを作成しています．
一般的には，『チェックボックス名.Value』と個々に定義しますが，
For文を用いて取得したいと思っています．

そこで、以下のようなソースを考えました．
-----
For i = 1 To 5
　　strName = "Chkbox" & i
　　ar_chk(i) = Selection.ShapeRange(strName).Value
Next
-----

しかしながら，構文エラーになってしまいました．
『Selection.ShapeRange(strName).Select』で対象のチェックボックスは選択できたので，
『Selection.ShapeRange(strName).Value』も大丈夫かと思い実行したのですが駄目でした．

何か良い方法はありますか？
教えて下さい．宜しくお願いします．

1 hits

▼

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

≪