• ベストアンサー

VBからACCESSのレポートを印刷

ACCESSは2000です。 どうかよろしくお願いします。 ソースを書いてくださってもいいですし、ホームページでもいいですので・・・

質問者が選んだベストアンサー

  • ベストアンサー
  • TAGOSAKU7
  • ベストアンサー率65% (276/422)
回答No.2

VBの参照設定で Microsoft Access 9.0 Object Library のチェックをONにしてください。 sghさんの言われているとおり、自Accessアプリ内の制御は基本的にDoCmdを使用します。 VB6や外部のAccessなど(Office製品のVBA全て)から使用するのであれば、頭に対象となるAccess.Applicationの情報を付加するだけで、対象のAccessオブジェクトのDoCmd命令を実行することができます。 Sub subAccReportPrint()   Dim accApp As Access.Application      'Access の新しいインスタンスを作成   Set accApp = CreateObject("Access.Application")      'データベースを Access ウィンドウで開く   accApp.OpenCurrentDatabase "c:\test.mdb"      '印刷   accApp.DoCmd.OpenReport "レポート名", acViewNormal      '現在開いているデータベースを閉じる   accApp.CloseCurrentDatabase      'インスタンス破棄   Set accApp = Nothing End Sub

参考URL:
http://oshiete1.goo.ne.jp/kotaeru.php3?q=37226

その他の回答 (1)

  • sgh
  • ベストアンサー率61% (75/121)
回答No.1

VB6からACCESSですか?それともVBA.. VBAからなら DoCmd.OpenReport "レポート名", acViewNormal となります。 外していたらごめんなさい。

関連するQ&A

  • VBからACCESSのレポートへの出力に関して

    環境:Visual Basic2008 Express Ediotion,ACCESS2000 教えて下さい。 Visual Basic2008で開発を行っていますが、帳票の部分だけをACCESS2000の レポート機能を使って出力したいと考えています。 単純にACCESSのレポートを起動させる方法は、幾つかのホームページに記載が ありましたが、Visual Basicの方で作成された"データ"を用いて、ACCESS側のレポート に出力するような事をしたい為、調べた結果では手段が見つかりませんでした。 あるホームページに、データセット等を活用すれば出力できるような記載もありましたが、 細かな情報がなく、どのように記述したら良いかが記載されていなかった為、この 方法だけでなくどのようにしたら良いかの参考になるようなホームページ、あるいは ソースの記述を教えて頂きたいと思います。 よろしくお願いします。

  • Accessのレポート印刷について教えて下さい。

    Accessのフォームでフィルタを使い絞り込んだデータをレポートで 印刷する場合について教えて下さい。 DoCmd.OpenReport "レポート名", acViewPreview, , Me.Filter では、フォームとレポートが同じレコードソースだと使えるという事ですが、 フォームとレポートのレコードソースが別の場合はどのようにすると フィルタで絞り込んだ条件のレポートを印刷できますか? 教えて下さい。よろしくお願いします。

  • VB6からACCESSのレポートを印刷  

    OpenReportはレポート1 text2.text はテキスト型(何部印刷) oleAccess.DoCmd.OpenReport ReportName, acNormal oleAccess.DoCmd.PrintOut acPages, , , , CInt(Text2.Text) 上記の内容では印刷したときに、印刷ドキュメントがOpenReportとPrintOutでは違うんですけど,これでは 別々のデータが印刷さるのでこまってます。どうかいいアドバイスを下さい. 例  ACCESSのテーブル    テーブル1(青くなっている状態)    テーブル2    ACCESSのレポート    レポート1(青くなっている状態) っていう具合になっていて、ACCESSを開くとテーブル1にカ ーソルがある状態。 印刷のドキュメント レポート1 テーブル1 っいうふうになっていて、困っています. レポート1だけを何部印刷するとかはできないんですかね?

  • VB6からACCESSのレポートを印刷 

    今いちを印刷はでます。だけど下のソースでは、何部印刷するかとかできないとおもうのですが、例えば、3部印刷するにはどういう風にプログラムを作るのですか。 かたちは、テキストに数字を入れるようなかんじにするのでよろしくおねがいします。 oleAccess.DoCmd.OpenReport ReportName, acNormal

  • アクセス2003でレポート印刷について。

    いつもいつもお世話になっています。 アクセス2003で月間の抽出結果一覧がある帳票フォーム(選択クエリがレコードソースです)があり、印刷ボタンでその一覧のレポートを印刷したいと考えています。 そのフォームを開く時に、抽出条件として西暦と月を入力するのですが、そのレポート(同じ選択クエリがレコードソース)を印刷するときも再度西暦と月を指定しなければいけません。この年、月の入力を一度ですませるにはどのようにしたらよいでしょうか? どなたかよろしくお願いいたします。

  • VB6からアクセスのレポートをプレビューするには?

    おはようございます。またまた躓いたのでお助け下さい<(_ _)>VB6で、アクセス2000にパーツ名を読み書きしています。アクセスの方でレポートを作ってあるのですが、印刷はいけそうなのですが、これを印刷前にプレビューしたいのですが、 Set accApp = CreateObject("Access.Application") accApp.OpenCurrentDatabase "C:\part-name.mdb" accApp.DoCmd.OpenReport "パーツ情報", acViewNormal 印刷について参考にさせていただいたソースです。DoCmd.OpenReport が印刷ですよね?ここを変更するのでしょうか?よろしくお願いします<(_ _)>

  • VBからACCESSのレポート出力

    すみません。どうしてもわからないので、質問させて頂きます。 VB6.0 + ACCESS2000 で開発をしています。 インターフェイスはVB,DBはACCESSなのですが、帳票の出力も、 ACCESSで行いたいと思っております。 この時、クライアントにACCEESSが入っていない事も想定して、 ACCESSランタイムも用意しました。 デバッグマシン(OFFICEは入っていません)にランタイム(VB,ACCESS)を インストールして、実行ファイルを実行すると、印刷の部分で、「エラー429 Activeコンポーネントはオブジェクトを作成できません」とのエラーが出て、印刷ができません。 印刷以外は問題なく動いています。 開発マシンは、Win2000、デバッグマシンはWinXPで、ACCESSランタイムはOFFICE XP Developerで作成しました。 下記にソースコードも記載させて頂きます。 もちろん、開発ではきちんと動作しています。 Dim oleAccess As Access.Application Set oleAccess = GetObject(App.Path & "\data\data.mdb") Call oleAccess.DoCmd.OpenReport(ReportName, acPreview) oleAccess.DoCmd.Maximize oleAccess.Visible = True 当初は、「oleAccess.OpenCurrentDatabase」でDBを開いていたのですが、 ACCESSランタイム環境では、GetObjectの方が良いということを聞いたので、 上記の様になっています。 エラーが起きている行は、どうやら「GetObject」の行のようです(oleAccess.OpenCurrentDatabaseの場合でもエラー)。 ACCESSランタイムを使う事が初めてなので、手探りでやっているため、 的外れな所もあるかと思います。 何かアドバイスを頂ければ幸いでございます。 よろしくお願い致します。

  • アクセスのレポートについて

    アクセスでテーブルAのデータをレコードソースとするレポートAを作成したのですが、レポートAのなかにテーブルBのレコードソースを追加することは可能でしょうか。  また一からレポートを作り直さずにすむ方法が知りたいのですが。

  • accessのレポートについて

    accessのレポートでテキストボックスのコントロールソースに =[名前] & "様" と入力したんですが,#エラー とでてしまいます。様という字を追加するにはどうすればいいのでしょうか?

  • アクセスのレポートの作り方について。

    アクセスで報告書を作りたいのですが、フォームで検査結果はS,I,Rなのに報告書には1,2,3で表示されます。レポートの詳しい作成方法が分かるホームページなどがありましたら教えていただけないでしょうか?みなさんはどのようにアクセスの勉強をされたのでしょうか?私は本を数冊買って調べるのですがなかなか難しいです。よろしくお願いいたします。