No.2ベストアンサー
- 回答日時:
あまりこういう処理にしないので今考えましたが・・。
クエリー1のレコード件数を取得して0の場合は別フォームを開く
Function Sample()
Dim db As Database
Dim rs As Recordset
Dim stDocName As String
Dim stLinkCriteria As String
Set db = CurrentDb
Set rs = db.OpenRecordset("クエリー1")
rs.MoveLast
If rs.RecordCount = 0 then
stDocName = "別フォーム"
DoCmd.OpenForm stDocName, , , stLinkCriteria
End If
End Function
これで行けるのではないかと思います。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Accessのクエリの結果を、既存のエクセルに追加したい 2 2022/07/31 22:44
- Excel(エクセル) EXCELの外部データ取得ができない 1 2023/03/23 09:03
- その他(データベース) 更新クエリをリンクデータベーステーブルに実行し実行時エラー3362固有インデックスに重複する値が含ま 1 2022/09/21 11:44
- Access(アクセス) access レポート 請求書について 2 2022/07/04 22:52
- Access(アクセス) アクセス フォームの自動入力 1 2023/03/20 00:18
- Access(アクセス) Accessのリンクテーブルのパスを相対パスにする方法について教えて頂きたいです 1 2023/02/08 13:29
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- その他(データベース) 20万行あるデータを動かしたい 2 2023/06/13 15:21
- Access(アクセス) アクセスの更新クエリでカレントレコードのみ更新したい 1 2022/06/02 23:32
- Access(アクセス) Access DAOのExecuteメソッドのオプション(RecordsetOptionEnum)に 1 2022/09/19 07:34
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
前のレコードの値を自動で入れたい
PowerPoint(パワーポイント)
-
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
-
4
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
5
ACCESSでフォームを使って、テーブルを参照、データ入力、データ更新をしたいのです
Access(アクセス)
-
6
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
-
7
AccessからExcelにエクスポートする時に常に上書きしたい
Excel(エクセル)
-
8
Access クエリの結果が0件だった場合、エラーを表示させる方法
Access(アクセス)
-
9
アクセスのテキストボックスの初期値を空白に
Access(アクセス)
-
10
ACCESSのテーブルの行と列を入れ替えたい
Excel(エクセル)
-
11
アクセスVBAのMe!と[ ]
Access(アクセス)
-
12
ACCESSで日付ごとに自動連番(日付+連番)する方法
Access(アクセス)
-
13
Access→Excelへエクスポートすると日付の表示形式が変化する
Excel(エクセル)
-
14
Access チェックボックスでチェックしたデータのみフォームで表示
Access(アクセス)
-
15
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
16
アクセスのエラー「クエリには出力フィールドが1つ以上必要です。」
その他(Microsoft Office)
-
17
accessで該当するレコードがない場合
その他(プログラミング・Web制作)
-
18
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
19
Access終了時にマクロまたはVBAの実行したい
その他(Microsoft Office)
-
20
クエリで出来た表にチェックボックスを追加する
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
アクセスでフォームビューがみ...
-
レコードを保存するコード ア...
-
アクセス 前レコード内容を、...
-
ACCESSフォームのリストボック...
-
AccessVBA RecordSourceのリセ...
-
Access表形式フォームのデータ...
-
ACCESS起動時に所定フォームを...
-
Accessで新しいレコードに規定...
-
新規レコード行を非表示にしたい
-
Access サブフォームにフィルタ...
-
accessのクエリで、該当するデ...
-
異なるフォームに属する関数間...
-
帳票フォーム後に
-
Access2002_メソッドまたはデー...
-
Accessでのフィールドの並び替え
-
access レコード数が増えない、...
-
アクセス:フォームでVBAを使...
-
Accessで上の行を自動でコピー...
-
Accessでレコードの保存をせず...
-
Access非連結フォームから複数...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
レコードを保存するコード ア...
-
アクセスでフォームビューがみ...
-
新規レコード行を非表示にしたい
-
フィルタ後のフォームの件数の...
-
ACCESS起動時に所定フォームを...
-
ACCESSでフォームを使って、テ...
-
アクセスの自動保存解除はでき...
-
accessのクエリで、該当するデ...
-
Accessでレコードの保存をせず...
-
AccessVBA RecordSourceのリセ...
-
Accessで上の行を自動でコピー...
-
Accessでフォーム上に 直前の...
-
Access2010、値を入力したら自...
-
Access サブフォームにフィルタ...
-
レコード削除時に(サブ)フォー...
-
Access 帳票フォームでカレント...
-
Accessで新しいレコードに規定...
-
Access レコード移動時イベント...
-
アクセス データの競合を非表...
-
Access:フォームプロパティ「...
おすすめ情報