Kopioi Excel -työkirjat

Anonim

Excel -tiedostojen kopioiminen makron avulla

Haluatko kopioida Excel -työkirjan ja antaa sille uuden nimen? Voit tietysti tehdä tämän Windowsin kautta, mutta miten automatisoit sen Excelissä? Yksi mahdollisuus on avata sopiva työkirja ja tallentaa se uudella nimellä.

Tämä vie kuitenkin paljon aikaa ja on hankalaa, koska Excel suorittaa laskutoimituksia, päivittää linkkejä ja vastaavia, kun työkirja avataan. Se on helpompi tehdä suoraan käyttämällä VBA FileCopy -komentoa. Seuraava makro kopioi työkirjan hakemistosta toiseen määrittämällä uuden nimen:

Kopioi työkirja ()
Himmennä lähde merkkijonona, kohde merkkijonona
Lähde = "c: \ August.xls"
Kohde = "c: \ data \ September.xls"
FileCopy -lähde, kohde
End Sub

Laita muuttuja sisään lähde Määritä kopioitavan tiedoston nimi ja polku. Tallenna muuttujaan kohde tiedoston polku ja kohde. Esimerkkiohjelmassa August.xls -tiedosto polusta C: \ tallennetaan uudella nimellä September.xls polulle C: \ Daten. Lähdetiedosto August.xls pysyy muuttumattomana.

Komennolla voit kopioida paitsi Excel -työkirjoja myös muita tiedostoja.