[[20060915094542]]　『マクロ列幅のコピーでエラー』（ビッキー）　ページの最後に飛ぶ

『マクロ列幅のコピーでエラー』（ビッキー）

 マクロで形式を指定して貼り付けで 列幅を選んで 貼り付けるというのを
 マクロの記録をしたところ、以下のようになりました。

    Columns("A:B").Select
    Selection.Copy
    Range("F1").Select
    Selection.PasteSpecial Paste:=xlColumnWidths, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False

 これを再び、実行すると
     Selection.PasteSpecial Paste:=xlColumnWidths, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False

 のところで
 「RangeクラスのPasteSpecial メソッドが失敗しました」
 となってしまいます。
 マクロの記録した状態で 何も修正していないのに
 何がいけないのでしょうか。

[[20060613164708]]『ﾍﾟｲｽﾄｽﾍﾟｼｬﾙでエラー』（かず）

 こちらにのっているようです。（ウグイス）

 (ウグイス)さん、xlColumnWidthsというのが定義されてないので 8 を使用すればいいのですね。うまくいきました。ありがとうございました（ビッキー）

コメント返信：

[ 一覧(最新更新順) ]

[[20060915094542]] 『マクロ列幅のコピーでエラー』（ビッキー） ページの最後に飛ぶ

[[20060915094542]]　『マクロ列幅のコピーでエラー』（ビッキー）　ページの最後に飛ぶ