Как копировать данные из определенных ячеек в новый файл со сдвигом?

Question

[citizentwo]

Доброго времени!
Есть большой, постоянно изменяющийся файл (вручную), необходимо сделать нечто вроде логгирования изменений в определенных ячейках. Пример: из ячеек D8 и С18 в исходном файле "matrix.xlsx" копировать информацию в A1 и B1 в файл log.xlsx соответственно, и далее сдвиг на ячейку вниз для следующей записи.

Comments

[citizentwo]

John Smith, добрый день! Кроме как написания макроса варианта я не вижу, но не могу сообразить как перекинуть данные в другой файл, просто копировать со сдвигом делаю так:

Sub
    Range("A1").Copy
    Cells(Application.Max(3, Cells(Rows.Count, 1).End(xlUp)(2).Row), 1).PasteSpecial xlPasteValues
End Sub