VBAのプログラムでCheckboxの使い方

すみません。教えてください。

チェックボタンオブジェクト名を配列に格納したいのですが、可能でしょうか。

<内容>
例えば、チェックボタンオブジェクト名がcheckbox1～checkbox4まで在ったとき、"checkbox & 変数" にしたいのです。

<Sample>

Sub CHECKBOX()
Dim i As long

For i = 1 To 4
With Worksheets(Sheet_No)
On_Off(i) = .Controls("CheckBox" & i).Value
End With
Next i

MsgBox (On_Off(2))

End Sub

No.1 ベストアンサー 回答者： FlossenEngel 回答日時： 2003/11/14 20:10

コントロールツールボックスからワークシートに貼り付けたチェックボックスをVBAで参照したいということであれば、

With Worksheets(Sheet_No)
On_Off(i) = .OLEObjects("CheckBox" & i).Object.Value
End With

この回答へのお礼

ありがとうございました。
おかげで助かりました。

お礼日時：2003/11/14 23:18