|
Jaka さんへ
JAKAさんの様に
>Private Sub UserForm_Initialize()
>Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
の時なんですけど、
JAKAさんの回答のプログラムは、ぱっと見、シートにコントロール
の情報を保存しておく方法なのでしょうか。(何も考えずに単純に、コピーしてみたらエラーになりました)
僕の場合ブックが開いている間のみ情報が残ればよいので配列変数に残したいのですが、フレームの中にフレームがあるためControls.valueだとフレームに
valueプロパティが無いためかエラーになります。
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
(フォーム1上のコマンドボタン)情報保存
Dim i As Byte
i = 0
For Each HenControls In Frame1.Controls
If HenControls Is Not Frame2 then
HenInputControls(i) = HenControls.value
i = i + 1
End If
Next
End Sub
として配列変数に情報を記録したいのですが、
If HenControls Is Frame2 Then というやり方は出来ても
If HenControls Is Not Frame2 Then だとエラー(オブジェクトが必要です)
となるので Is Not というやり方が出来ません。
Is Not がなぜ駄目なのか、または Is Not に変わるやり方があれば
教えてください。
|
|