Excel VBA FileCopy funkcija
Kopiranje datoteke je ugrađena vba funkcija koja se koristi za kopiranje datoteke s jednog mjesta na drugo spomenuto mjesto. Da bismo koristili ovu funkciju, moramo spomenuti trenutnu stazu datoteke i odredišnu stazu datoteke.
Ok, pogledajmo sintaksu funkcije FileCopy.
- Izvor: Ovo nije ništa drugo doli odakle trebamo kopirati datoteku. Moramo spomenuti potpuno kvalificirani put do mape.
- Odredište: Ovo je odredišna mapa u koju trebamo zalijepiti kopiranu datoteku.
Primjeri
Ispod su primjeri kako kopirati datoteke pomoću VBA koda.
Primjer # 1
Počnimo s jednostavnim primjerom. U mapi imam datoteku pod nazivom "Prodaja u travnju 2019." Ispod je slika istog, tj. " Izvor".
S gornjeg mjesta želim kopirati ovu datoteku i zalijepiti je u drugu mapu. Ispod je slika istog, tj. " Izvor odredišta".
Ok, napišimo kod za to.
Otvorite funkciju FileCopy unutar Sub postupka.
Kodirati:
PoddatotekaCopy_Example1 ()
FileCopy
Kraj pod
Sada za prvi argument, moramo spomenuti put do datoteke u kojoj se nalazi naša valuta.
Kodirati:
PoddatotekaCopy_Example1 ()
FileCopy “D: My Files VBA April Files
Kraj pod
Nakon spominjanja puta mape, moramo spomenuti i datoteku s nastavkom datoteke. Dakle, spomenite naziv datoteke stavljajući kosu crtu ().
Kodirati:
Sub FileCopy_Example1 () FileCopy "D: My Files VBA April Files Sales April 2019.xlsx", End Sub
Sada u drugom argumentu spomenite gdje trebamo zalijepiti kopiranu datoteku.
Kodirati:
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
Jedna stvar koju moramo učiniti u nastavku, spominjući put do mape na kraju, moramo spomenuti i naziv datoteke u odredišnom argumentu.
Sada pokrenite kôd pomoću tipke F5 ili ručno. Zatim će kopirati datoteku sa donjeg mjesta na odredište.
"D: Moje datoteke VBA Travanj datoteke Prodaja travanj 2019.xlsx"
“D: Moje datoteke VBA Odredišna mapa Prodaja travanj 2019.xlsx”
Primjer # 2 - Koristite varijable za pohranu izvornog puta i odredišta.
U prethodnom smo primjeru izvornu i odredišnu stazu naveli izravno u formulu. Ali ovo nije najbolja praksa za nastavak, zato ih pohranimo u varijable.
Na primjer, pogledajte donji kod.
Kodirati:
Sub FileCopy_Example2 () Zatamni SourcePath kao niz Zatamni DestinationPath kao niz SourcePath = "D: My Files VBA April Files Sales April 2019.xlsx" DestinationPath = "D: My Files VBA Destination Folder Sales April 2019. xlsx "FileCopy SourcePath, DestinationPath End Sub
Dopustite mi da vam detaljno objasnim kod.
Prvo, proglasio sam dvije varijable.
Priguši izvorni put kao niz Priguši odredišni put kao niz
Tada sam za prvu varijablu dodijelio put do mape odakle ona mora kopirati datoteku i naziv datoteke zajedno s njenim nastavkom datoteke.
SourcePath = "D: Moje datoteke VBA Travanj datoteke Prodaja travanj 2019.xlsx"
Za drugu sam varijablu, slično, dodijelio put odredišne mape s imenom datoteke i ekstenzijom excel.
DestinationPath = "D: Moje datoteke VBA Odredišna mapa Prodaja travanj 2019.xlsx"
Tada sam za formulu FileCopy dostavio ove varijable umjesto dugačkih nizova puta mape.
FileCopy SourcePath, DestinationPath
Ovako, možemo koristiti varijable za spremanje staza i njihovu učinkovitu upotrebu.
Primjer # 3 - Pogreška s funkcijom kopiranja datoteke
Ponekad funkcija kopiranja datoteke naiđe na pogrešku "Dozvola odbijena".
Razlog zašto dobivamo ovu pogrešku jer kada se otvori datoteka za kopiranje i ako pokušate kopirati gornju pogrešku, uvijek zatvorite datoteku i izvršite kôd.
