お世話になります。
ACCESSの勉強を始めたばかりの初心者です。
請求書発行のデータベースを作っているのですが、顧客と納期で抽出して請求書を発行しようとしています。
以下コードですが、実行時エラーで「型が一致しません」というメッセージがが出ます。
どうにもこうにも分からないのでご教示願えますでしょうか…。
どうぞよろしくお願いします。
--
Private Sub コマンド14_Click()
If IsNull(Me.顧客名コンボ) Then
MsgBox "顧客名を選択して下さい。", vbOKOnly, "顧客名"
Me.顧客名コンボ.SetFocus
ElseIf IsNull(Me.開始) Then
MsgBox "開始年月日を入力して下さい。", vbOKOnly, "開始"
Me.開始.SetFocus
ElseIf IsNull(Me.終了) Then
MsgBox "終了年月日を入力して下さい。", vbOKOnly, "終了"
Me.終了.SetFocus
Else
DoCmd.OpenReport "R請求書", acPreview, , "顧客名='" & 顧客名コンボ.Value & "'" And "納期 Between #" & Me!開始 & "# And #" & Me!終了 & "#"
End If
End Sub
No.3ベストアンサー
- 回答日時:
> DoCmd.OpenReport "R請求書", acPreview, , "顧客名='" & 顧客名コンボ.Value & "'" And "納期 Between #" & Me!開始 & "# And #" & Me!終了 & "#"
↓
DoCmd.OpenReport "R請求書", acPreview, , "顧客名='" & 顧客名コンボ.Value & "' And 納期 Between #" & Me!開始 & "# And #" & Me!終了 & "#"
bonaronさん
ありがとうございます!
納期の前のAndをダブルクォーテーションで囲っていたのが原因だったのですね。
まだ構文などがきちんと理解できていなかったのでとても助かりました。
もっと勉強しなければですね!
No.2
- 回答日時:
あとはフォーマット形式でもないでしょうし、間違えて全角で入力している訳でも・・・
ちょっと思い浮かばずすいません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Access IF文でテーブルに存在しない場合の処理について 2 2022/10/10 18:09
- Visual Basic(VBA) [Excel VBA] このコードでは行の挿入や行の消去をすると13のエラーが出てしまう。 3 2022/12/09 00:29
- Access(アクセス) Accessのテキストボックスの入力文字制限 1 2023/01/18 20:43
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/06 17:46
- Visual Basic(VBA) Excel VBA ユーザーフォーム 複数のユーザーフォームの閉じ方。 2 2022/04/27 11:29
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Access(アクセス) チェックボックスにチェックが入った後の挙動 1 2022/08/21 12:39
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
- Visual Basic(VBA) ファイル全てを .xlsm に変更したところ、プログラムが途中で落ちてしまっています 17 2022/12/07 12:03
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
下請け業者が直接顧客と取引し...
-
営業初心者
-
前任者と比較されたら
-
受注先は「顧客」?
-
顧客の敬称
-
顧客から営業へのクレームで、...
-
ISOにおける顧客満足の調査方法
-
AccessVBAでループ使...
-
三国間貿易ならぬ2国間3者変則...
-
ラベルのUL規格について
-
50万世帯で約150万人の顧...
-
0120-899-543Amazonカスタマー...
-
SBI証券の経営層は操作画面(UI)...
-
0120-899-543Amazonカスタマー...
-
顧客企業ってなんですか?
-
AccessVBAでの可視・不可視の切...
-
お客様、お客さん、顧客、カス...
-
Skypeのお客様カスタマーセンタ...
-
エクセルで顧客全体の平均満足...
-
旦那がキャバクラに行っていま...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
下請け業者が直接顧客と取引し...
-
顧客から営業へのクレームで、...
-
SBI証券の経営層は操作画面(UI)...
-
顧客の敬称
-
0120-899-543Amazonカスタマー...
-
顧客企業ってなんですか?
-
前任者と比較されたら
-
ファイナンシャルプラナーの収...
-
AccessVBAでの可視・不可視の切...
-
ラベルのUL規格について
-
【敬称】販売店の担当者をお客...
-
ラブホテルにあったら嬉しいも...
-
NHK受信料を払っているのに訪問...
-
仕入先の当社の顧客への直接取...
-
フォワーダー営業の楽しさって...
-
JIS C 2411 電気絶縁用シリコ...
-
おはようございます。最近、大...
-
お客様、お客さん、顧客、カス...
-
納品後の見積書
-
マスタープランへの噛み込み の...
おすすめ情報
ちなみにデバッグ画面です。
画像が小さくて見えなかったので…。