■ 現在のこのページの役立ち度：
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する：
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右)：大変役立った)：
■ ページの共有：
[ サイト内検索 ]
カスタム検索
English translation
Chinese : simplified Chinese
Chinese : traditional Chinese
#43434-0エクセルワークシートへ出力匿名434342001-05-27(日) 22:33
#43434-0
エクセルワークシートへ出力
匿名434342001-05-27(日) 22:33
こんばんわ

VB6.0SP5 アクセス2000　エクセル2000　で作成しております。

VBでレコードを入力、アクセス2000のテーブルに保存しております。
アクセス2000のテーブルからエクセル2000のワークシートに出力したいのです。
エクセル2000のブックの新規作成まで出来たのですが、
次のコードの場所で、
実行時エラー438
オブジェクトは、このプロパティまたは、メソッドをサポートしていません。
と、エラーが出ます。
コードは

　　　　　　　　　ここの行全体がエラーとして、表示されます。　　　　　　　　
With objBook　　　　　　　　　　　↓
            .Worksheets(1).Range("A2").CopyFormRecordset rs
            .SaveAs App.Path & "\shiireExcel.xls"
End With

問題の場所を、.Worksheets(1).Cells("2,1").CopyFormRecordset rs
にしても同様でした。
参考書等を調べても不明です。　　宜しくお願い致します。
お探しの情報は見つかりましたか？お困りの問題は解決しましたか？
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
（※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など）