Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> software >> Microsoft Access >> .

Come modificare una data di modifica in Excel VBE

Il linguaggio di programmazione VBA di Excel consente di manipolare il tempo in cui un file è stato creato e modificato . Questo processo è utile quando si desidera modificare le date di programmazione dei file di rollback delle modifiche o impostare un processo manuale che registra i cambiamenti che le persone fanno per il file di Excel e la data in cui sono state apportate le modifiche di file . Istruzioni
1

Aprire il software Excel dal menu del programma di Windows e aprire il file di Excel che si desidera utilizzare per modificare la data del file. Fare clic sulla scheda "Sviluppatore " o nastro e fare clic sul pulsante di VBA per aprire il file di codice VBA .
2

Creare le variabili di VBA . È necessario impostare la variabile per la " data di modifica " attributo di file e la data che si desidera utilizzare per la data di modifica . Il codice seguente imposta le variabili :

file di fioco come risultati StringDim As BooleanDim NewDate Come DoubleDim modificato come FileDateToProcess
3

Impostare il nome del file . Si utilizza la variabile "file" per impostare il nome del file . Il codice seguente imposta la stringa del nome del file : file di

= " myfile.xls "

sostituire " myfile.xls " con qualsiasi nome di file che si desidera modificare
< . br> 4

Cambia la data di modifica del file . È possibile utilizzare la funzione di Excel VBA " SetFileDateTime " per modificare la data di modifica . Il codice seguente la data cambia a " 1/1/2011 " :

NewDate = " 1/1/2011 " risultati = SetFileDateTime ( FileName : = file , FileDateTime : = newdaate , WhichDateToChange : = modificato , NoGMTConvert : = False ) economici 5

Visualizzare un messaggio di successo per l'utente dopo la data viene modificata . Il codice seguente determina se sono stati rilevati errori e visualizza il messaggio di successo :

risultati = True ThenDebug.Print "File modificato con successo." End If

 

software © www.354353.com