(ACCESS)条件に応じて、テキストボックスを表示・非表示設定
フォーム上のテキストボックスAを条件に応じて表示・非表示にさせたいです。
条件は、サブフォームのテキストボックスBに「支払」を言う文字があれば、
テキストボックスAが表示され、なければ非表示にする方法が探しています。
わからないなりに調べて、多分以下の文章になると思いますが、「?」の条件式がうまくいきません
Private Sub AA_GotFocus()
If ????? Then
Me!テキストボックスA.Visible = False
Else
Me!テキストボックスA.Visible = True
End If
End Sub
どなたか教えてください。
宜しくお願い致します。
No.2
- 回答日時:
(1)はテキストボックスBに「支払」という文字だけが
表示されている場合、(2)は「支払」という文字が含まれて
いる場合です。
(1)
Private Sub AA_GotFocus()
If Forms!フォーム名!ctlサブフォーム名!テキストボックスB = "支払" Then
「ctlサブフォーム名」はメインフォームのサブフォームを
表示するコントロールの名前で作成時は「埋め込み0」などと
名前がついている部分です。直接、サブフォームの名前は
書きません。
サブフォームが帳票形式やデータシート形式の場合は
サブフォームのカレントレコード、すなわち
サブフォームの左の黒い三角のマークがついているレコードが
対象になります。単票形式の場合は表示されたレコードが
カレントレコードです。
(2)
以下はテキストボックスBに「支払」という文字が含まれている場合
です。(1)と同様にカレントレコードに対してです。
Private Sub t1_GotFocus()
If Forms!フォーム名!ctlサブフォーム名!テキストボックスB Like "*" & "支払" & "*" Then
No.1
- 回答日時:
テキストボックスAがメインフォームにあり
テキストボックスBがサブフォームにあって
その値が「支払」である
(「ほにゃ支払らら・・」などの余計な文字は含んでいないとします)
フォーカス取得後イベントではなく
サブフォームのレコード移動時イベントに加えてみてください。
Forms!メインフォーム名!テキストボックスA名.Visible = Forms!メインフォーム名!サブフォーム名!テキストボックスB名 = "支払"
当方Acc2002です。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(Microsoft Office) エクセルのマクロを教えてください。 1 2023/01/27 09:05
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 6 2022/06/08 12:55
- その他(パソコン・スマホ・電化製品) ワードでテキストボックス内の文字を連動させない方法 2 2023/02/09 16:56
- Access(アクセス) Accessでセレクタをダブルクリックで別フォームで詳細表示 3 2022/12/20 10:36
- Visual Basic(VBA) 検索のユーザーフォームの表示について 1 2023/03/27 23:31
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2022/06/10 11:06
- Visual Basic(VBA) VBA Bookの表示、非表示 1 2022/09/16 20:44
- Visual Basic(VBA) excel vba でユーザーフォーム入力ができない 2 2022/12/12 14:42
- Access(アクセス) Accessの参照フィールドの列がずれてしまいます 1 2023/07/19 15:00
- Visual Basic(VBA) Excel VBA キーワードから列を取得して、さらに空欄行を非表示にする 3 2022/10/21 22:49
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Accessのフォームにて、詳細行のボタンを行の内容により、表示/非表
その他(Microsoft Office)
-
レポートのラベルなどの非表示は可能か?
その他(データベース)
-
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
-
4
AccessVBAでの可視・不可視の切り替え
PowerPoint(パワーポイント)
-
5
アクセスでテキストボックスを可視にしたい。
Access(アクセス)
-
6
Access サブフォームでの選択行の取得
その他(データベース)
-
7
ACCESSで条件によってサブフォームを非表示に
その他(ソフトウェア)
-
8
Accessの条件付き書式設定で、複数の条件が一致した時の書式を設定したい
その他(Microsoft Office)
-
9
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
10
アクセスVBAのMe!と[ ]
Access(アクセス)
-
11
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
12
サブフォームを非表示させる方法を教えて下さい
その他(Microsoft Office)
-
13
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
14
新規レコード行を非表示にしたい
Access(アクセス)
-
15
ラベルを表示したり非表示にしたりしたい
Visual Basic(VBA)
-
16
Access フォームのテキストボックスに半角英字のみで入力する設定は
Access(アクセス)
-
17
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
18
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
19
Accessで、フォームからフォームへ値を引き継ぐやり方
Access(アクセス)
-
20
ACCESSのフォーム、開くんですが、見えないようにするには
Access(アクセス)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Access サブフォームでの選択行...
-
Access2000 サブフォームのReco...
-
Access 複数フォームを...
-
AccessのDoCmd.ApplyFilterの使...
-
Access2000、これはいったい・...
-
access サブフォームにリストを...
-
Access VBA acCmdSelectRec...
-
ACCESSでサブフォームの...
-
ACCSESS2013VBA フォームのレコ...
-
サブフォームでフィルタしたデ...
-
Accessのコンボボックスに連動...
-
AccessのFormのみをスクリーン...
-
googleフォームでインストール...
-
レコードセットで得た結果をサ...
-
Accessのサブフォームから値を...
-
ACCESSでのデータ削除について
-
2回目に画面のレコードセットの...
-
単票フォームと帳票フォームを...
-
Accessのサブフォーム内で連続...
-
サブフォームでのダブルクリッ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Access サブフォームでの選択行...
-
Access2000、これはいったい・...
-
Accessのサブフォームから値を...
-
Access 複数フォームを...
-
ACCSESS2013VBA フォームのレコ...
-
(ACCESS)条件に応じて、テキ...
-
Access2000 サブフォームのReco...
-
access サブフォームにリストを...
-
アクセスでサブフォームのレコ...
-
サブフォームが見えなくなる。
-
サブフォームのデータを保存す...
-
AccessのFormのみをスクリーン...
-
レコードセットで得た結果をサ...
-
Accessでのフォーム表示がうま...
-
サブフォームの切り替え方を教...
-
2回目に画面のレコードセットの...
-
ACCESSでfilterとorderbyについて
-
Accessで、一覧からクリックし...
-
Accessのサブフォーム内で連続...
-
googleフォームでインストール...
おすすめ情報