
お世話になります。
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で質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
0120-899-543Amazonカスタマー...
-
0120-899-543Amazonカスタマー...
-
下請け業者が直接顧客と取引し...
-
SBI証券の経営層は操作画面(UI)...
-
顧客から営業へのクレームで、...
-
前任者と比較されたら
-
顧客の敬称
-
NHK受信料を払っているのに訪問...
-
会社経営、大口客か?小口客の...
-
おはようございます。最近、大...
-
AccessVBAでの可視・不可視の切...
-
やはり、顔がイケメンでないと...
-
マスタープランへの噛み込み の...
-
顧客企業ってなんですか?
-
なぜルートセールスはサボれますか
-
【敬称】販売店の担当者をお客...
-
仕入先の当社の顧客への直接取...
-
カスタマーエンジニアの仕事内容
-
事務員にとっての顧客満足とは
-
顧客への納品ファイルのファイ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
0120-899-543Amazonカスタマー...
-
下請け業者が直接顧客と取引し...
-
顧客の敬称
-
顧客から営業へのクレームで、...
-
前任者と比較されたら
-
顧客への納品ファイルのファイ...
-
0120-899-543Amazonカスタマー...
-
受注先は「顧客」?
-
AccessVBAでの可視・不可視の切...
-
なぜルートセールスはサボれますか
-
【敬称】販売店の担当者をお客...
-
SBI証券の経営層は操作画面(UI)...
-
おはようございます。最近、大...
-
顧客企業ってなんですか?
-
JIS C 2411 電気絶縁用シリコ...
-
NHK受信料を払っているのに訪問...
-
お客様、お客さん、顧客、カス...
-
ラブホテルにあったら嬉しいも...
-
マスタープランへの噛み込み の...
-
ISOにおける顧客満足の調査方法
おすすめ情報
ちなみにデバッグ画面です。
画像が小さくて見えなかったので…。