VBからEXCELでコピー＆書式のみをペーストするには？

しげ 2005-04-15 19:01:01 No: 89410

VB5.0からEXCELにてセルのコピーをし、書式のみを貼り付けたいのですが、EXCELのVBAで使える「PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False」がVBではエラーになります。
これに対する解決方法はご存知ありませんでしょうか？
どうぞよろしくお願いいたします。

藤代千尋 2005-04-29 01:59:53 No: 89411

エラーのメッセージは？

しょうじ 2005-05-02 02:31:10 No: 89412

「VBでは」ということで、Excel VBAではエラーになっていませんか？
だとすると、VB側でMicrosoft Excel Object xx Libliryへの参照設定が
設定されてないのでは（xxは、Excel2000なら9.0でした）。

xlValuesとかは、Excelの定数ですから。。参照設定しないなら、この表現
は使わず、直接定数の値をセットするといいかもです。

PasteSpecial -4163, -4142, False, False

みたいに（VB5環境無いので試してませんが・・）。

しょうじ 2005-05-02 02:37:30 No: 89413

表題だと書式のみペーストでしたね・・

' 値のみペースト（-4163=xlValues）
PasteSpecial -4163, -4142, False, False

' 書式のみペースト（-4122=xlFormats）
PasteSpecial -4122, -4142, False, False