VBA実行時エラー91

私はVBAでこのコードに問題があり、実行時エラー91が発生します。

 Private ChkTemp(90) As Checkbox

 ChkTemp(0) = Temp1
 .
 .
 .
 ChkTemp(89) = Temp90

新しく宣言されたチェックボックス（ChkTemp）にデザインタイム checkbox（Temp1）を割り当てようとしました。

1
追加された 編集された
ビュー: 4
源
ru fr es pt de ar
どの味VBA？ Excel、Word、Access ...？
追加された 著者 Fionnuala, 源

1 答え

必要がある;

Private ChkTemp(90) As MSForms.CheckBox

オブジェクト参照を割り当てるには、 set ;を使用する必要があります。

Set ChkTemp(0) = Temp1

あなたもすることができます;

Private ChkTemp(1 To 90) As MSForms.CheckBox
...
Dim i As Long
For i = 1 To UBound(ChkTemp)
    Set ChkTemp(i) = Me.Controls("Temp" & i)
Next
3
追加された
源