Saps que és important fer una còpia de seguretat del teu treball. Ara podeu fer que una macro d'Excel ho faci per vosaltres. Aquesta macro senzilla desa el vostre llibre de treball en un fitxer nou amb la data d'avui com a part del nom.
Com funciona la macro
El truc d'aquesta macro és reunir el nom del fitxer nou com a camí, la data d'avui i el nom del fitxer original.
El camí es captura mitjançant la propietat Path de l'objecte ThisWorkbook. La data d'avui s'agafa amb la funció Data.
Per defecte, la funció Data retorna mm/dd/aaaa. Les barres obliques farien que el fitxer no desa el fitxer, de manera que formateu la data amb guionets (Format(Data, "mm-dd-aa")) perquè Windows no permet barres inclinades en els noms de fitxer.
L'última part del nou nom de fitxer és el nom de fitxer original. El captureu utilitzant la propietat Name de l'objecte ThisWorkbook:
Sub macro1()
"Pas 1: deseu el llibre de treball amb un nom de fitxer nou
ThisWorkbook.SaveCopyAs _
Nom del fitxer:=ThisWorkbook.Path & " & _