Excel VBA質問箱 IV

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

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


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

48008 / 76738

←次へ　｜　前へ→


	【33670】Re:フォームのチェックボックスなどの情報を一時的に保存

サザエ - 06/1/17(火) 21:08 -


	引用なし

	パスワード

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)
(フォーム１上のコマンドボタン）情報保存
　　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　に変わるやり方があれば
教えてください。

0 hits

▼

【33622】フォームのチェックボックスなどの情報を一時的に保存 サザエ 06/1/16(月) 23:19