![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
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でフォームを使って、テーブルを参照、データ入力、データ更新をしたいのです
Access(アクセス)
-
5
Access クエリの結果が0件だった場合、エラーを表示させる方法
Access(アクセス)
-
6
アクセスのテキストボックスの初期値を空白に
Access(アクセス)
-
7
アクセスVBAのMe!と[ ]
Access(アクセス)
-
8
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
-
9
アクセスのエラー「クエリには出力フィールドが1つ以上必要です。」
その他(Microsoft Office)
-
10
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
11
Access チェックボックスでチェックしたデータのみフォームで表示
Access(アクセス)
-
12
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
13
accessで該当するレコードがない場合
その他(プログラミング・Web制作)
-
14
クエリで出来た表にチェックボックスを追加する
その他(Microsoft Office)
-
15
Access終了時にマクロまたはVBAの実行したい
その他(Microsoft Office)
-
16
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
17
ACCESSでテーブルにあるチェックボックスを一括でYesにする方法を教えてください
Access(アクセス)
-
18
AccessからExcelにエクスポートする時に常に上書きしたい
Excel(エクセル)
-
19
Accessでデータシートに同じデータがいくつもでてしまいます。
その他(データベース)
-
20
空白はダメというエラーの表示(アクセス)
その他(データベース)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
レコードを保存するコード ア...
-
ACCESSでフォームを使って、テ...
-
アクセスでフォームビューがみ...
-
Access2010、値を入力したら自...
-
Accessでのデータ消滅に...
-
AccessVBA RecordSourceのリセ...
-
Access:フォームプロパティ「...
-
新規レコード行を非表示にしたい
-
ACCESS起動時に所定フォームを...
-
ACCESS2000の条件付...
-
フィルタ後のフォームの件数の...
-
Accessでレコードの保存をせず...
-
Accessで上の行を自動でコピー...
-
フォームに更新ボタンを作った...
-
ACCESSのクエリで抽出したデー...
-
アクセスの自動保存解除はでき...
-
Accessのサブフォームで、次の...
-
Accessのデータで一問一答形式...
-
レコードをダブルクリックする...
-
異なるフォームに属する関数間...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
レコードを保存するコード ア...
-
アクセスでフォームビューがみ...
-
新規レコード行を非表示にしたい
-
フィルタ後のフォームの件数の...
-
ACCESS起動時に所定フォームを...
-
ACCESSでフォームを使って、テ...
-
アクセスの自動保存解除はでき...
-
accessのクエリで、該当するデ...
-
Accessでレコードの保存をせず...
-
AccessVBA RecordSourceのリセ...
-
Accessで上の行を自動でコピー...
-
Accessでフォーム上に 直前の...
-
Access2010、値を入力したら自...
-
Access サブフォームにフィルタ...
-
レコード削除時に(サブ)フォー...
-
Access 帳票フォームでカレント...
-
Accessで新しいレコードに規定...
-
Access レコード移動時イベント...
-
アクセス データの競合を非表...
-
Access:フォームプロパティ「...
おすすめ情報