Beschrijving van bestandskopie
Kopieert een bestand van de ene directory naar de andere.
Eenvoudige FileCopy-voorbeelden
| 1 | Bestandskopie "C:\Test.txt" "D:\" |
Hiermee wordt het bestand "Test.txt" op "C:\" naar de D-schijf gekopieerd.
Als het bestand "Test.txt" niet bestaat op "C:\", zal er een Runtime-fout '53' optreden: Bestand niet gevonden.
FileCopy-syntaxis
In de VBA-editor kunt u "FileCopy(" typen om de syntaxis voor de FileCopy-instructie te zien:
De FileCopy-instructie bevat 2 argumenten:
Bron: Tekenreeksnaam van het te kopiëren bestand. Kan pad bevatten.
Bestemming: Tekenreeksexpressie die de naam van het doelbestand aangeeft. De bestemming kan een map of map en een schijf bevatten.
Voorbeelden van Excel VBA FileCopy-functie
Gelieve te testen met de volgende code.
| 123456789101112131415161718192021222324252627282930 | Sub FileCopy_Example()Dim dlgFilePicker As FileDialogDim dlgFileSaveAs As As FileDialogDim strOrgFile As StringDim strTarFile As StringStel dlgFilePicker = Application.FileDialog(msoFileDialogFilePicker) indlgFilePicker.AllowMultiSelect = FalsedlgFilePicker.ButtonName = "Kopiëren"dlgFilePicker.Title = "Selecteer een bestand om te kopiëren"Als dlgFilePicker.Show = True DanstrOrgFile = dlgFilePicker.SelectedItems(1)AndersSluit subStop alsStel dlgFileSaveAs = Application.FileDialog(msoFileDialogSaveAs) indlgFileSaveAs.Title = "Geef een map aan en schrijf een bestandsnaam op."dlgFileSaveAs.ButtonName = "Plakken"Als dlgFileSaveAs.Show = True DanstrTarFile = dlgFileSaveAs.SelectedItems(1)AndersSluit subStop alsBestandCopy strOrgFile, strTarFileEinde sub |
Als u het uitvoert, wordt eerst een dialoogvenster weergegeven "Selecteer een bestand om te kopiëren".
Vervolgens moet u een bestand selecteren om te kopiëren.
Klik na het selecteren van een bestand op de knop “Kopiëren”.
Vervolgens wordt een dialoogvenster weergegeven "Geef een map aan en schrijf een bestandsnaam".
U moet een doelmap selecteren en een bestandsnaam schrijven.
Klik daarna op de knop “Plakken”.
Vervolgens wordt het bronbestand gekopieerd met de doelmap en bestandsnaam.
