Как да дублирате Excel файлове с помощта на макрос
Искате ли да копирате работна книга на Excel и да й дадете ново име? Разбира се, можете да направите това чрез Windows, но как да го автоматизирате в Excel? Една от възможностите е да отворите съответната работна книга и след това да я запазите под ново име.
Това обаче отнема много време и е тромаво, защото Excel извършва изчисления, актуализира връзки и други подобни при отваряне на работната книга. По -лесно е да го направите директно с помощта на командата VBA FileCopy. Следният макрос копира работна книга от една директория в друга, като посочва ново име:
Копиране на подработна книга ()
Източник на затъмняване като низ, дестинация като низ
Източник = "c: \ August.xls"
Дестинация = "c: \ data \ September.xls"
FileCopy източник, местоназначение
End Sub
Поставете променливата източник Посочете името и пътя на файла, който искате да копирате. Запазете в променливата цел пътя и местоназначението на файла. В примерната програма файлът August.xls от пътя C: \ се записва под новото име September.xls в пътя C: \ Daten. Изходният файл August.xls остава непроменен.
С командата можете не само да копирате работни книги на Excel, но и други файлове.