Jos haluat tulostaa useista Excel-työkirjoista hakemistossa, voit käyttää tässä esitettyä makroa tulostaaksesi ne kaikki kerralla.
Kuinka makro toimii
Tässä makrossa käytät Dir-funktiota palauttamaan merkkijonon, joka edustaa tiedoston nimeä, joka vastaa sitä, mitä sille välität.
Käytät Dir-funktiota luettelemaan kaikki tietyn hakemiston .xlsx-tiedostot ja tallentamaan kunkin tiedoston nimen. Sitten avaat jokaisen tiedoston, tulostat sen ja suljet sen.
Alamakro1()
'Vaihe 1: Ilmoita muuttujasi
Himmennä MyFiles merkkijonona
'Vaihe 2: Määritä kohdehakemisto
Omat tiedostot = Dir("C:Temp*.xlsx")
Tee kun MyFiles <> "
"Vaihe 3: Avaa työkirjat yksitellen
Työkirjat. Avaa "C:Temp" ja MyFiles