Funkcja Excel VBA FileCopy
Kopiowanie pliku to wbudowana funkcja vba używana do kopiowania pliku z jednej lokalizacji do innej wspomnianej lokalizacji. Aby skorzystać z tej funkcji, musimy podać bieżącą ścieżkę do pliku i ścieżkę do pliku docelowego.
Ok, spójrzmy na składnię funkcji FileCopy.
- Źródło: to nic innego, jak tylko miejsce, z którego musimy skopiować plik. Musimy wspomnieć o pełnej ścieżce folderu.
- Miejsce docelowe: jest to folder docelowy, w którym musimy wkleić skopiowany plik.
Przykłady
Poniżej znajdują się przykłady kopiowania plików za pomocą kodu VBA.
Przykład 1
Zacznijmy od prostego przykładu. Mam w folderze plik o nazwie „Sales April 2019”. Poniżej znajduje się obraz tego samego, tj. „ Źródło”.
Z powyższej lokalizacji chcę skopiować ten plik i wkleić go do innego folderu. Poniżej znajduje się obraz tego samego, tj. „ Źródło docelowe”.
Ok, napiszmy do tego kod.
Otwórz funkcję FileCopy w procedurze Sub.
Kod:
PodplikCopy_Example1 ()
FileCopy
Napis końcowy
Teraz jako pierwszy argument musimy wspomnieć o ścieżce do pliku, w którym znajduje się nasza waluta.
Kod:
PodplikCopy_Example1 ()
FileCopy “D: My Files VBA April Files
Napis końcowy
Po podaniu ścieżki do folderu, musimy również wspomnieć o pliku z rozszerzeniem. Wymień więc nazwę pliku, umieszczając ukośnik odwrotny ().
Kod:
Sub FileCopy_Example1 () FileCopy "D: My Files VBA April Files Sales April 2019.xlsx", End Sub
Teraz w drugim argumencie wspomnij, gdzie musimy wkleić skopiowany plik.
Kod:
Sub FileCopy_Example1 () FileCopy "D: My Files VBA April Files Sales April 2019.xlsx", "D: My Files VBA Destination Folder Sales April 2019.xlsx" End Sub
Jedną rzeczą, którą musimy zrobić, po wspominaniu o ścieżce folderu na końcu, jest podanie nazwy pliku również w argumencie docelowym.
Teraz uruchom kod za pomocą klawisza F5 lub ręcznie. Następnie skopiuje plik z poniższej lokalizacji do lokalizacji docelowej.
„D: My Files VBA April Files Sales April 2019.xlsx”
„D: My Files VBA Destination Folder Sales April 2019.xlsx”
Przykład 2 - użycie zmiennych do przechowywania ścieżki źródłowej i docelowej.
W poprzednim przykładzie podaliśmy ścieżkę źródłową i ścieżkę docelową bezpośrednio do formuły. Ale to nie jest najlepsza praktyka, aby kontynuować, więc zapiszmy je w zmiennych.
Na przykład spójrz na poniższy kod.
Kod:
Sub FileCopy_Example2 () Dim SourcePath As String Dim DestinationPath As String SourcePath = "D: My Files VBA April Files Sales April 2019.xlsx" DestinationPath = "D: My Files VBA Destination Folder Sales kwiecień 2019 r. xlsx "FileCopy SourcePath, DestinationPath End Sub
Pozwól, że wyjaśnię ci szczegółowo kod.
Najpierw zadeklarowałem dwie zmienne.
Dim SourcePath As String Dim DestinationPath As String
Następnie dla pierwszej zmiennej przypisałem ścieżkę do folderu, z którego ma skopiować plik i nazwę pliku wraz z jego rozszerzeniem.
SourcePath = „D: My Files VBA April Files Sales April 2019.xlsx”
W przypadku drugiej zmiennej, podobnie, przypisałem ścieżkę folderu docelowego z nazwą pliku i rozszerzeniem programu Excel.
DestinationPath = "D: My Files VBA Destination Folder Sales kwiecień 2019.xlsx"
Następnie dla formuły FileCopy podałem te zmienne zamiast długich ciągów ścieżek folderów.
FileCopy SourcePath, DestinationPath
W ten sposób możemy używać zmiennych do przechowywania ścieżek i efektywnego ich używania.
Przykład # 3 - Błąd w funkcji kopiowania plików
Czasami funkcja kopiowania plików napotyka błąd „Odmowa uprawnień”.
Powód, dla którego otrzymujemy ten błąd, ponieważ gdy kopiowany plik jest otwierany i jeśli spróbujesz skopiować powyższy błąd, zawsze zamknij plik i wykonaj kod.
