FileCopy Kuvaus
Kopioi tiedoston hakemistosta toiseen.
Yksinkertaisia FileCopy -esimerkkejä
| 1 | FileCopy "C: \ Test.txt" "D: \" |
Tämä kopioi tiedoston "Test.txt" tiedostosta "C: \" D -asemaan.
Jos tiedostoa “Test.txt” ei ole tiedostossa “C: \”, tapahtuu ajonaikainen virhe ’53’: Tiedostoa ei löydy.
FileCopy -syntaksi
VBA -editorissa voit kirjoittaa FileCopy () nähdäksesi FileCopy -lauseen syntaksin:
FileCopy -lause sisältää 2 argumenttia:
Lähde: Kopioitavan tiedoston merkkijono. Voi sisältää polun.
Kohde: Merkkijonolauseke, joka määrittää kohdetiedoston nimen. Kohde voi sisältää hakemiston tai kansion ja aseman.
Esimerkkejä Excel VBA FileCopy -toiminnosta
Testaa seuraavalla koodilla.
| 123456789101112131415161718192021222324252627282930 | AlitiedostoCopy_Example ()Dim dlgFilePicker FileDialoginaDim dlgFileSaveAs FileDialoginaDim strOrgFile merkkijononaDim strTarFile merkkijononaAseta dlgFilePicker = Application.FileDialog (msoFileDialogFilePicker)dlgFilePicker.AllowMultiSelect = VäärädlgFilePicker.ButtonName = "Kopioi"dlgFilePicker.Title = "Valitse kopioitava tiedosto"Jos dlgFilePicker.Show = Tosi sittenstrOrgFile = dlgFilePicker.SelectedItems (1)MuuLopeta SubLoppu JosAseta dlgFileSaveAs = Application.FileDialog (msoFileDialogSaveAs)dlgFileSaveAs.Title = "Anna kansio ja kirjoita tiedoston nimi."dlgFileSaveAs.ButtonName = "Liitä"Jos dlgFileSaveAs.Show = Tosi sittenstrTarFile = dlgFileSaveAs.SelectedItems (1)MuuLopeta SubLoppu JosFileCopy strOrgFile, strTarFileEnd Sub |
Suorittamalla se näyttää ensin valintaikkunan "Valitse kopioitava tiedosto".
Valitse sitten kopioitava tiedosto.
Kun olet valinnut tiedoston, napsauta Kopioi -painiketta.
Sitten se näyttää valintaikkunan "Ilmoita kansio ja kirjoita tiedoston nimi".
Valitse kohdekansio ja kirjoita tiedostonimi.
Napsauta sen jälkeen "Liitä" -painiketta.
Tämän jälkeen lähdetiedosto kopioidaan kohdekansion ja tiedostonimen kanssa.
