excel_OAをダウンロードしていただきまして有難うございました。  VB 5.0 proとExcel 97用のサンプルです。  画像などを含むデーターベースファイルをVBで表形式で印刷するのは困難なことです。  そこでExcel 97をプリンター代わりにして印刷します。  OLEオートメーションのサンプルとして分かりやすいと思います。  解凍するとexcel_oa.bas excel_oa.exe excel_oa.frm excel_oa.mdb excel_oa.vbp excel_oa.xlsが現れます。  同じディレクトリに置いて下さい。  excel_oa.exeで実行可能です。  このソフトを作ったときは遅くて実用的でなかったのですが今なら十分使えると思います。 'excel_OA Ver 0.9 エクセルOLEオートメーションを利用してエクセルにデーターを作成し印刷する。 '原作者 古口正巳 [koguchi@sf.airnet.ne.jp http://sf.airnet.ne.jp/koguchi/] ' 'このマクロは改変・再配布可能のフリーウェアです。 'このプログラムを使用して起きた不都合については保証しません。各自の責任で使用して下さい。 ' '目的:VBでOLEオブジェクトが入ったデーターファイルを印刷するのは困難なのでエクセルをプリンター代わりに使う 'あらかじめエクセルを開いて罫線やフォント等を設定しておくと美しく印刷可能。 'OLEコントロールを何回も使っているとエラーで停止するので、10回毎にリセットしている。 ' MS DAO3.5 MS EXCEL 8.0オブジェクトライブラリへの参照設定が必要 'プログラム実行ディレクトリにexcel_oa.xls,excel_oa.mdbが必要 '作成中のエクセルファイルが失われたり、動作中にエクセルを終了すると異常終了することもある。 'EXCEL97用 Excel95ならオブジェクトを変更する必要がある.activesheetを削除する。