いつも勉強させていただいており誠に感謝しております。

access2000を使用して簡単なプリントができるよう
に作っていたのですが、印刷の範囲選択のところで
悩んでおります。

テーブルはこんな感じです。

ID  会員名  会員住所
001 ああああ  テスト住所
002   いいいい 試験住所
003   うううう  実験住所
004   ええええ  テストアドレス

※以下1000会員ほど続きます。

このテーブルを使って、フォームを作成し
フォーム内で印刷させたい開始ID、終了IDをテキストボックスに入力させて、範囲印刷をさせたいのです。

選択させるIDを入力させるテキストボックスを
kaishi_text、終了させるテキストボックスを
syuuryou_textとする場合
同フォーム内に、ボタンを作成しクリック時の
イベントを作成したいのですがいい方法がわかりません。

どなたかお知恵をお貸し願えますでしょうか?
よろしくお願いいたします。

 

A 回答 (1件)

Private Sub コマンド0_Click()



Dim strFilter As String

strFilter = "ID>='" & Me.kaishi_text.Value & "' And ID<='" & Me.syuuryou_text.Value & "'"

DoCmd.OpenReport "テーブル名", acViewPreview, , strFilter

End Sub

IDフィールドが文字列型の場合は上記の方法でよいが、
もし数値型の場合は下記になる

strFilter = "ID>='" & Me.kaishi_text.Value & "' And ID<='" & Me.syuuryou_text.Value & "'"

strFilter = "ID>=" & Me.kaishi_text.Value & " And ID<=" & Me.syuuryou_text.Value
    • good
    • 0
この回答へのお礼

ご回答ありがとうございます。
早速やってみるとうまくいきました!
助かりました、how-do-you-do様ありがとうございます。

お礼日時:2005/04/01 13:19

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング

おすすめ情報