Millä VBA koodinpätkällä saan kopioitua hakemiston tiedostot toiseen hakemistoon?
Esim. "X:\HAKEMISTO 1" -> "X:\HAKEMISTO 1/BACKUP" ja kyselemättä päällekirjottaen.
Tiedostojen kopiointi VBA:lla.
petekki1
6
221
Vastaukset
referensseissä lisää Microsoft Scripting Runtime viittaus
Sub Testi()
Dim fso As New FileSystemObject
fso.CopyFolder "X:\HAKEMISTO 1", "X:\HAKEMISTO 1/BACKUP"
End Sub
Keep EXCELing
@Kunde- Petekki1
Herjaa Compile errorilla: User-defined type not defined viitaten riviin Dim fso As New FileSystemObject
- Petekki1
Petekki1 kirjoitti:
Herjaa Compile errorilla: User-defined type not defined viitaten riviin Dim fso As New FileSystemObject
Excel 2000. (Win XP Pro)
Petekki1 kirjoitti:
Excel 2000. (Win XP Pro)
referensseissä lisää Microsoft Scripting Runtime viittaus....
- Petekk1
kunde kirjoitti:
referensseissä lisää Microsoft Scripting Runtime viittaus....
Kiitos, tarkemmin lukien olihan referenssi ohje jo alkuperäisessä vastauksessasi.
Mutta, koodi ei suostu kopioimaan hakemistoa hakemistopuussa alaspäin eli,
fso.CopyFolder "X:\HAKEMISTO 1", "X:\HAKEMISTO 1\BACKUP" herjaa...
fso.CopyFolder "X:\HAKEMISTO 1", "X:\BACKUP" taas toimii moitteetta. Petekk1 kirjoitti:
Kiitos, tarkemmin lukien olihan referenssi ohje jo alkuperäisessä vastauksessasi.
Mutta, koodi ei suostu kopioimaan hakemistoa hakemistopuussa alaspäin eli,
fso.CopyFolder "X:\HAKEMISTO 1", "X:\HAKEMISTO 1\BACKUP" herjaa...
fso.CopyFolder "X:\HAKEMISTO 1", "X:\BACKUP" taas toimii moitteetta.Sub Testi()
Dim fso As New FileSystemObject
fso.CopyFolder "X:\HAKEMISTO 1", "X:\Huuhaa"
fso.CopyFolder "X:\Huuhaa", "X:\HAKEMISTO 1\BACKUP"
fso.DeleteFolder "X:\Huuhaa"
End Sub
Ketjusta on poistettu 1 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
PÄIVÄN PARAS: Nigerialainen haki turvapaikkaa Suomesta, lähti takas huilaamaan
kotimaahansa, koska turvapaikan saaminen kesti niin kauan. Ja tämän kertoo ihan Yle, eikä yhtään toimittaja kyseenalaist1593927Mikä vasemmistolaisista jankkaavaa vaivaa?
Pahasti on ihon alle, siis korvien väliin sinne tyhjään tilaan, päässeet kummittelemaan. Ei ole terveen ihmisen merkki1013674Ohjelma "Rikollisjengien Ruotsi" hyvin paljasti jakautuneen maan
eli ns. ruotsalaiset yhdellä puolella, muslimit ja muut kehitysmaalaiset toisella puolella. Siinäkin hyvin näki mitä ma423213Pidennetään viikko 8 päiväiseksi
Ja jätetään työpäivien määrä nykyiseen 5:een. Tuo olisi kompromissiratkaisu vellovaan keskusteluun työajan lyhentämisest222547- 1842248
Jos Katja Ståhl ei pääse juontamaan Elämäni biisiä, kenet haluaisit nähdä juontohommissa?
Katja Ståhl on ollut kuluvalla viikolla sairaalahoidossa. Jos Katja Ståhl ei pääse juontamaan Elämäni biisiä, kenet halu271447- 971277
Vähäkankailla ollut ongelmia vuokra-asunnossa
Aina ne ikävätkin asiat tulevat mediaan. Jasmin ja Marko saaneet edellisestä asunnostaan häädöt ja Jasmin todettu varatt1301127Tiesitkö? Tuure ja Saana Boelius ovat sisaruksia!
Tiesitkö? Tuure Boelius ja Saana Boelius ovat tänä syksynä kumpainenkin reality-ohjelmissa tv:ssä: Tuure Petollisissa ja241111Jos elämäsi ihminen
on osoittanut kiinnostuksensa, niin kannattaa vastata edes jotain vaikka mikä olisi. Toista mahdollisuutta ei välttämätt691058