Jak duplikować pliki Excela za pomocą makra?
Czy chcesz skopiować skoroszyt programu Excel i nadać mu nową nazwę? Oczywiście możesz to zrobić w systemie Windows, ale jak zautomatyzować to w programie Excel? Jedną z możliwości jest otwarcie odpowiedniego skoroszytu, a następnie zapisanie go pod nową nazwą.
Jednak zajmuje to dużo czasu i jest kłopotliwe, ponieważ Excel wykonuje obliczenia, aktualizuje łącza i tym podobne, gdy skoroszyt jest otwarty. Łatwiej zrobić to bezpośrednio za pomocą polecenia VBA FileCopy. Następujące makro kopiuje skoroszyt z jednego katalogu do drugiego, określając nową nazwę:
Kopiuj skoroszyt podrzędny ()
Dim źródło As String, miejsce docelowe As String
Źródło = "c: \ sierpień.xls"
Miejsce docelowe = "c: \ data \ wrzesień.xls"
Źródło FileCopy, miejsce docelowe
Napis końcowy
Wstaw zmienną źródło Określ nazwę i ścieżkę pliku, który chcesz skopiować. Zapisz w zmiennej cel ścieżka i miejsce docelowe pliku. W przykładowym programie plik August.xls ze ścieżki C: \ jest zapisany pod nową nazwą September.xls w ścieżce C: \ Daten. Plik źródłowy August.xls pozostaje niezmieniony.
Za pomocą polecenia możesz nie tylko kopiować skoroszyty programu Excel, ale także inne pliki.