質問: マクロ値のみの貼り付けに関して マクロ作成中の初心者です。 ブック1からブック2にコピーするマクロを作成中です。 With Workbooks("Book1.xlsx").WorkSheets("Sheet1") Insert(.Range(H4),Cells(Rows.Count,1).End(xlUp)).EntireRow, .Range("H:H").Copy_ Workbooks("Book2.xlsx").WorkSheets("Sheet1").Range("H5") 上記を実行する場合に値のみコピーして貼り付けたいのですがどのようにすればよいでしょうか。xlPasteValuesを使用すれば良いのは解るのですがコンパイルエラーになってしまいます。 よろしくお願いいたします。
回答: 補足してもらえますか Book1のシート1のどこの範囲に行を追加したいのですか? Book1のシート1のH4セルからA列の最終行までに行を挿入してその範囲をコピーしたいように見えますが。 上記の条件で合っているならば With Workbooks("Book1.xlsx").WorkSheets("Sheet1") .Range("H4:H" & .Cells(Rows.Count,1).End(xlUp).Row).EntireRow.Insert .Range("H:H").Copy End With Workbooks("Book2.xlsx").WorkSheets("Sheet1").Range("H5").Pastespecial XlPastevalues となります。