CopyToClipboardからEXCELへPaste

質問

oo4o+excel2002で開発しています。

OracleにSQLを投げて戻ってきた結果をExcelに貼り付けたいのですが、"Pasteに失敗しました"というエラーが出てしまします。

コードは以下のように書いてます。
======================================
Set rs = OraDatabase.CreateDynaset(strSql,ORADYN_READONLY)
'クリップボードにコピー
rs.CopyToClipboard -1

'当ブックのシートに貼り付ける
Windows("aaa.xls").Activate
Worksheets("bbb").Range("A1").Select
ActiveSheet.Paste
============================================
ActiveSheet.Pasteの部分で"Pasteに失敗しました"というエラーで落ちます。
ご存知の方教えてください。よろしくお願いします。

回答No.2

tsukasa-12r · ベストアンサー

BLOB 型とかのカラムが SQL の中に入ってるんじゃないでしょうか？
ちょっと試してみましたけど、CHAR、VARCHAR2、NUMBER のカラムだけだと、正常に貼り付けできました。
( Oracle 9i + WindowsXP + Excel2002 )

補足

みなさんありがとうございます。

自分で解決できてしましました…
なんか、サーバーのデータが消されていて、SQLの条件にヒットするデータがなかったためのようです。

項目はVARCHAR2、NUMBERのみでした。

ポイントは発行しますっ。ありがとうっ！

回答No.1

eipu

あまり自信はありませんが・・・

ActiveSheet.Paste の部分を

Selection.PasteSpecial

としてみたらどうでせう？