![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
いつもお世話になっております。
システム開発の練習中で、架空の取引先との請求処理をデータベースで管理するシステムを製作中です。
請求データ照会エントリーフォームのテキストボックスに取引先コードを入力し照会ボタンを押下すると取引先マスターテーブルと合致するデータが請求データ照会フォーム上に現れるといった流れで制作しています。
フォーム展開の流れは
〔請求データ照会エントリーF〕→〔請求データ照会F〕
と、単純なものです。
請求データ照会Fにデータの反映をすることは出来たのですが、取引先コードが先に登録されたデータに該当するものがない場合で照会ボタン押下した際、現段階ではまっさらなフォームが現れてスッキリしていないので、請求データ照会Fのフォームを表示せずに、メッセージボックスで「該当するデータがありません。」などといったメッセージを出したいのですが、出来ませんでした。
以下、照会ボタンクリック時の現段階でのプログラムです。
Private Sub 照会_Click()
On Error GoTo Err_照会_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "請求データ照会F"
stLinkCriteria = "[取引先コード]=" & "'" & Me![取引先コードtxt] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_照会_Click:
Exit Sub
Err_照会_Click:
MsgBox Err.Description
Resume Exit_照会_Click
End Sub
どういった内容のプログラムを組めばよいか、アドバイスいただませんか??
宜しくお願いいたします☆
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 指定文字列が該当するA列をアクティブセルにするには 3 2022/08/17 13:18
- Visual Basic(VBA) VBA 参照先で選んだファイルをコピーし、出力先に別名で保存したい 8 2022/05/13 20:37
- Visual Basic(VBA) Excel VBA ユーザーフォーム1のコンボボックスに別ブックの値を反映させたいです。 6 2023/03/21 16:12
- Visual Basic(VBA) 別シートのデータを参照して値を入れたい。 まとめデータシートのC列D列の値を商品一覧シートのコードが 7 2022/08/17 13:20
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Access(アクセス) アクセス フォームの自動入力 1 2023/03/20 00:18
- Access(アクセス) access レポート 請求書について 2 2022/07/04 22:52
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) 追記する列を増やしたい 2つのデータを検索・照合して元データにないデータを下記マクロで商品名を追記し 9 2022/10/05 10:50
- Visual Basic(VBA) VBA 請求書自動作成 3 2022/04/24 01:58
このQ&Aを見た人はこんなQ&Aも見ています
-
賃貸で可能な古民家風レトロな部屋作りのコツ!改めて知る畳の高い機能性と魅力も紹介
畳の部屋を雰囲気のよい部屋に仕上げたい!賃貸住宅でもできる古民家風のレトロな部屋作りのコツを伺った。
-
EXCEL VBA 指定したファイルが存在しない場合メッセージボックスを表示させる
Access(アクセス)
-
VBA 見つからなかった時の処理
Excel(エクセル)
-
accessで該当するレコードがない場合
その他(プログラミング・Web制作)
-
-
4
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
5
エクセルVBA セルに表示されたテキストと同じ名前のファイルを開きたい
Excel(エクセル)
-
6
VBA 存在しないシートを選択した時にエラーメッセージを表示するには?
Visual Basic(VBA)
-
7
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
8
ExcelのVBAのマクロで他のシートの複数項目をクリアする方法
Visual Basic(VBA)
-
9
VBAのオートフィルターで該当行がない場合に処理を止めたい
Excel(エクセル)
-
10
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
11
vba 2つの条件が一致したらコピーして別シートに値のみ貼り付け
Visual Basic(VBA)
-
12
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
13
エクセルVBAで、ある文字を含んでいたら別シートに抽出したい
Excel(エクセル)
-
14
エクセルVBAで開いているファイルをコピーする方法
Visual Basic(VBA)
-
15
Accessで、フォームからフォームへ値を引き継ぐやり方
Access(アクセス)
-
16
別のシートから値を取得するとき
Visual Basic(VBA)
-
17
ACCESS フォームをそのまま印刷について
その他(データベース)
-
18
クエリ実行結果0件の場合のフォーム展開中止とメッセージ表示
Access(アクセス)
-
19
EXCEL VBA 一致しないデータの抽出及びデータ更新
Excel(エクセル)
-
20
エクセルVBAでテキストボックスに入力があった場合のみ、ワークシートに転記したい
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
教えて下さい
-
配列でデータが入っている要素...
-
S9タイプからXタイプにデータ...
-
VBA 空白セルを削除ではない方...
-
Accessで該当データにフラグを...
-
DataGridViewのデータの引渡し...
-
ACCESS VBA インデックスが有効...
-
VBAを使ってOutlookメール本文...
-
[エクセル]データの個数が2番目...
-
この行は既に別のテーブルに属...
-
マクロで同じフォルダにある画...
-
VBAでシートからコンボボックス...
-
バーコードリーダーの読込デー...
-
ノイズの入った波形をきれいな...
-
GridViewの行の一部を複数行にする
-
シリアル通信でのデータ受信
-
issetでボタンが押されたかを確...
-
MATLAB matファイル(名前にピ...
-
多量のSUMIF式を軽くしたい
-
「0x00ff0000」?
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
教えて下さい
-
配列でデータが入っている要素...
-
【エクセル】測定時間がバラバ...
-
メモ帳(テキストデータ)をExc...
-
VBA 空白セルを削除ではない方...
-
多量のSUMIF式を軽くしたい
-
この行は既に別のテーブルに属...
-
S9タイプからXタイプにデータ...
-
Excelのマクロでワードのテキス...
-
エクセルで2つの時系列のデー...
-
Accessで該当データにフラグを...
-
ユーザーフォームのテキストボ...
-
シーケンサにパソコンからアク...
-
EXCELVBAでSQLserverからデータ...
-
[C言語] コメント文字列を無視...
-
VBAを使ってOutlookメール本文...
-
プログラミング python pandas ...
-
VBA 毎日取得するデータを順番...
-
<VB>String→Object
-
カンマからスラッシュに
おすすめ情報