指定したExcelを開かずに参照するマクロです。 指定したExcelの「Sheet1」A1~F15内で、A、C、E列のみ、マクロを組んだExcelに転記します。 Sub DB() '※実行時バインディングバージョン' '転記先をクリア' Worksheets("Sheet1").Cells().Clear '変数、インスタンス化' Dim cn As ...