|
▼マナ さん:
>▼のんぼ さん:
>
>1)複数シート、複数ブックを扱う場合は、どのブックの、どのシートを操作したいかわかるように、ブック、シート指定する
>2)Aのブック(マクロを書いてあるブック)は、ThisWorkbookで指定可能
>3)Bのブックは、開いた時に変数にセットしておくと、ブックの指定に使える
>4)新規シートを追加して、そこにすべてのデータをコピーするなら、最初からシートのコピーだけでよいです
>
>例えばこんな感じ
>
>Sub test2()
> Dim vntfilename As Variant
> Dim wb As Workbook
>
> vntfilename = Application.GetOpenFilename( _
> filefilter:="エクセルファイル(*.xlsx),*.xlsx")
> If vntfilename = False Then Exit Sub
>
> Set wb = Workbooks.Open(vntfilename)
>
> ThisWorkbook.Worksheets("Sheet2").Copy after:=wb.Worksheets(1)
>
>End Sub
大変わかりやすいご返答いただきまして、ありがとうございました。
構文をためしましたら、できました。マクロブックの表示の仕方など大変勉強になりました。本当にありがとうございました。
|
|