「変数にフォームからの入力値は入るのですが２（続き）。」

質問

「変数にフォームからの入力値は入るのですが２（続き）。」

>データシートビューを開く
クエリビルダのメニューバー「表示(V)」の中に
「データシートビュー(S)」があるので、これを
クリックします。
因みにSQLビューも同メニューバー内にあります。
→データシートビューを開いても何もないのですが・・・。
　見ているところが悪いのでしょうか？。
　レポートをデザインビューで開いて左上の■からメニューが開けますが・・・。

>「型が一致しません」
stdocnameのデータ型、repoのデータ型の
どちらかがおかしいのですが、99%後者です。
Dim repo As Reports になってませんか？
→Dim repo As Reportsになっています。

Option Explicit

'共通変数の宣言
Dim stdocname As String
Dim repo As Report
Dim delt As String
Dim kmsg As String
Dim app As Object

※．「お礼をすると終わってしまうみたいですね、申し訳ありません。」

回答No.2

nda23 · ベストアンサー

>消月、消線、日印刷、月、日、ロットマーク、勤務帯、勤務者、開始生産番号、枚数があります。
だから、どの項目に#Errorが出るんですか？

#Errorが出るテキストボックス（その他）の
コントロールソース（に書いてある内容）を
提示してくださいと何度も言ってるんですけど・・・

そこにレポートのレコードソース上にない項目が
指定されていたり、値そのままではなく、何かの
演算であれば#Errorになる可能性があります。

お礼

お礼が２つあるようですので、１つ目で、すみません、試してみます。

回答No.1

nda23

>何もない
つまり、該当データが１件も無い状態と言うことでしょうか？
この場合、空データを１件だけ出力しようとします。
各フィールドの値は参照不可能なので、これを使って
演算などを行うと#Errorとなります。
この場合はコントロールを修正するか、データが無い場合は
レポートを開かないようにします。
前者を修正するには#Errorとなるテキストボックスの
コントロールソースを提示してください。
後者はレポートのイベントで、「空データ時」というのが
あるので、この手続きの中でCancel=TrueとすればOKです。

>Dim repo As Reportsになっています。
>Dim repo As Report
話が違いますね。日本人は単数形/複数形に無頓着ですが、
前にも回答したように単数形はオブジェクト、複数形は
コレクションで意味がかなり違います。
Reports自体はコレクションですが、Reports("～")は
コレクション内の特定のものを表すのでオブジェクトです。
従って、Reports(stdocname)を受け取る変数は単数形の
オブジェクト型でなければなりません。

>お礼をすると終わってしまうみたいですね
形式が変わってから質問したことがないのですが、
ベストアンサーを選んだり、意図的に閉じない限り、
スレッドは続くハズですけどね。
もし、閉じるようなら「補足」にしてみては？

お礼

メールは届いたのですが、回答内容が出ないので、こちらで。
レポート上の全ての項目に＃Ｅｒｒｏｒが出ます。
月、日、勤務帯、開始番号、ロットマーク、担当者が出力項目ですが、
これら全て＃Ｅｒｒｏｒとなります。
消月の消線と、日、勤務帯、開始番号、ロットマーク、担当者に対する消線は出力されます。

補足

フォームのイメージですが、
項目として、
消月、消線、日印刷、月、日、ロットマーク、勤務帯、勤務者、開始生産番号、枚数があります。
印刷されるのは、月（月に○印を印刷）、日、ロットマーク、勤務帯、勤務者、開始生産番号（枚数分）
が印刷されます。各項目、消月～枚数まで全てリストボックス、テーブルがあるのはロットマークと
勤務者のみです。
通常、消月：０～１２（０が入ると印刷済みの月に消線を引かない）を選択、消線：上下左右に２回印刷
出来るようになっている為、１回印刷すると（上段・下段・消線無←最初の印刷時）どちらかに消線を選択
、月・日は印刷する日（消月に対して、月に○印を印刷）、勤務帯は交代勤務の種類、勤務者は勤務者の
氏名、開始生産番号は通常１から（印刷が終わると枚数の次の値から）、枚数分は枚数分だけ。です。

ですから、データはロットマークと勤務者はテーブルで、あとは印刷の都度リストから選択しています。
ＲｅｐｏｒｔはＲｅｐｏｒｔｓで定義しないとダメなわけなんですね。
ありがとうございます。