A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
No2です。
>FormAはModelessで表示しています。
であれば、
>If (FormA.Visible = True) Then
によって、表示状態であれば初期状態に戻ることはないはずです。
>Initialize() の実行は、Visible属性の参照では実行されないものとロジックを
>組み立てていたので、その変更を余儀なくされていて~~
ですので、ロジック自体には問題ないと思いますし、フォーム上のコントロールの値を取得することも可能です。
ただし、No2にも記したようにそのタイミングが難しいと思います。
勝手に、想像するところでは、ユーザが入力等の操作をする前に値を取得しようとしていませんか?
そのあたりの制御をどのようになさっているのか不明ですけれど・・
No.2
- 回答日時:
こんにちは
試してみましたが、フォームが非表示の場合には、Visible属性を参照すると Initialize() が実行されているようです。
しかしながら、
>If (FormA.Visible = True) Then
で確認する必要があるということは、フォームをModelessで表示しているということですよね?
その場合であれば(表示されていれば) Initialize() は実行されないようです。
ですので、ご質問のケースの場合「表示されていれば」の処理のようですので、問題にはならないと想像しますけれど・・?
一方で、Modeless表示の場合は、VBAはそのまま処理を続けますので、普通にベタに記述しているのならば、フォーム内の値を取ろうとしても、表示した際の初期値が返ってくることになるでしょう。
ユーザの入力を検知する等の処理を行いたいのであれば、フォームのプロシージャに記載するか、あるいは入力が済むのを待ってから実行を継続するなり、別の処理として実行するなりにしておかないと入力値を取得するのは難しいと思われます。
サポートありがとうございます。
FormAはModelessで表示しています。
Initialize() の実行は、Visible属性の参照では実行されないものとロジックを組み立てていたので、その変更を余儀なくされていて、質問さてている頂いている次第です。
よろしくお願いします。
No.1
- 回答日時:
こんにちは
仕様のようですが・・・素朴な疑問として
FormA.Visible が通ると言う事は 対象のユーザーフォームがあるブックで実行すると言う事でしょうか、FormA.Showで表示されている時にFormAのコントロールから実行するのかな・・・そんな事ないですよね
何処から If (FormA.Visible = True) Then を実行するのかしら・・
実行トリガーはともかくとして 例えば 同じブックから実行するのなら
Dim fm As UserForm
For Each fm In UserForms
If TypeOf fm Is FormA Then
MsgBox "表示済み"
End If
Next
こんなので取得できそうかな
回答ありがとうございます。
本件、同じブックのことです。
示して頂きましたフォームの有無判定の方法は、使用させて頂きたいと思います。
ありがとうございます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 検索のユーザーフォームの表示について 1 2023/03/27 23:31
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) VBA Bookの表示、非表示 1 2022/09/16 20:44
- JavaScript 入力フォームの javascript で メールアドレスの正規チェックをを行い、ボタンをクリックして 2 2022/04/27 16:06
- Visual Basic(VBA) VB.net 2 2022/08/23 22:07
- Excel(エクセル) エクセルの数式で教えてください。 2 2023/03/09 10:07
- Windows 10 表示をさせないようにする方法を教えてください 4 2023/03/17 20:12
- システム システムで表示させない方法があるのでしょうか。 1 2023/03/17 20:04
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/02/17 11:59
- Access(アクセス) Vba Userformを前面に出すについて 3 2022/04/15 12:29
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
VBAでユーザーフォームの表示を確認
Visual Basic(VBA)
-
エクセルVBAでUserFormを起動した時
Excel(エクセル)
-
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
-
4
VBAでユーザーフォームを再表示させたい。
Excel(エクセル)
-
5
VBA:ユーザーフォームのマルチページに色を付けたい。
Word(ワード)
-
6
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
7
Vba Userformを前面に出すについて
Access(アクセス)
-
8
エクセルVBAのフォームを最前面にする方法を教えてください。
Visual Basic(VBA)
-
9
Formの表示状態の取得
Visual Basic(VBA)
-
10
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
11
Excel VBA:フォーム←→セルのアクティブ切り替え
Excel(エクセル)
-
12
VBA ユーザーフォームのChangeイベントを停止したい
Access(アクセス)
-
13
メッセージボックスに表示する文字を大きくしたい
Excel(エクセル)
-
14
フォームのアクティブと非アクティブ表示について
Visual Basic(VBA)
-
15
エクセルVBAのIf,Then 構文でOr条件とAnd条件の結合方法?
Excel(エクセル)
-
16
リストボックスの特定行の背景色
Visual Basic(VBA)
-
17
エクセルVBAでマルチページの切り替え方法の件で
Excel(エクセル)
-
18
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
19
コマンドボタンのEnterイベント後に、フォーカスを移動したい。
その他(Microsoft Office)
-
20
ユーザーフォームで動的(Me.Controls.Add)に作成したコントロールの削除
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルVBA 作業後に選択範囲...
-
別のフォームで記述している関...
-
VBAでのユーザフォームの表示有...
-
Sub Auto_Open() 実行されない
-
ACCESSで別DBにあるクエリを...
-
エクセル マクロ 別シートから...
-
エクセルのVBAにショートカット...
-
Excel VBAのステップイン
-
ascW関数の結果がおかしい
-
GetAsyncKeyState() を利用する...
-
excelのvbaを使って日付を置換...
-
Excel vba 条件分岐 空白セルが...
-
エクセルで条件をつけて図形を...
-
エクセルでの6ヶ月平均の出し方
-
ワードで、グレーの部分しか入...
-
緯度と経度をグーグルMAPに入れ...
-
GPS位置情報で2点の中間地点の...
-
GoogleMapAPI ズームレベルと縮...
-
ツールバーの「ファイル(F)、...
-
エクセルで非表示行を抜かして...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBA 作業後に選択範囲...
-
Excel VBA 選択範囲の罫線色の...
-
別のフォームで記述している関...
-
VBAでのユーザフォームの表示有...
-
Sub Auto_Open() 実行されない
-
ACCESSで別DBにあるクエリを...
-
ascW関数の結果がおかしい
-
ExcelVBAで毎月月初の最初にBoo...
-
Excelのマクロ実行後に動作が重...
-
Excelで、チェックボックスにチ...
-
最小化ボタンで最小化したフォ...
-
エクセルのVBAにショートカット...
-
Excel vba 条件分岐 空白セルが...
-
円の中に等間隔に線を引くには
-
エクセル マクロ 別シートから...
-
C++Builderのエラー...
-
ステップモードの動作確認方法
-
Excel VBAのステップイン
-
GetAsyncKeyState() を利用する...
-
メニューバーのイベントが2回...
おすすめ情報