|
VBA初心者です。
Aのブック(マクロ)から、
Dim vntfilename As Variant
vntfilename = _
Application.GetOpenFilename( _
filefilter:="エクセルファイル(*.xlsx),*.xlsx" & _
Bのブックを取得して、
Dim ws As Worksheet
ActiveSheet.UsedRange.Select
Next Sht
Worksheets.Add after:=Worksheets(1)
ActiveSheet.Name = "追加"
シートを追加します。
Aのブック(Shet2)をBのブック(追加シート)にコピーしたいのですがうまくいきません。試した構文
Dim ws As Worksheet
Set ws = Worksheets("sheet2")
Worksheets("sheet2").Range("a1:l21").Copy
Worksheets("追加").Range("a1").PasteSpecial Paste:=xlPasteA
エラーが発生します。
どなたかご教授願います。
|
|