Come aprire il file più recente in una cartella in Microsoft Excel
Nel caso in cui desideri un codice VBA che ti permetta di aprire il file salvato di recente nella cartella con un semplice clic sul pulsante della macro.
Domanda): Ho un team di 10 persone e sto cercando urgentemente una macro che mi aiuti ad aprire l'ultimo file salvato dal membro del team in modo da non dover seguire il percorso in cui è stato salvato il file.
Dobbiamo seguire i passaggi seguenti:
- Fare clic sulla scheda Sviluppatore
- Dal gruppo Codice, seleziona Visual Basic
- Inserisci il seguente codice nel modulo del foglio di lavoro
Opzione esplicita
Sub NewestFile()
Dim MyPath As String
Dim MyFile As String
Dim LatestFile As String
Dim Ultime Data come data
Dim LMD come data
MioPercorso = "C:\Utenti\Documenti\"
If Right(MyPath, 1) "\" Then MyPath = MyPath & "\"
MyFile = Dir(MyPath & "*.xls", vbNormal)
Se Len(MyFile) = 0 Allora
MsgBox "Nessun file trovato… ", vbExclamation
Esci Sotto
Finisci se
Do While Len(MyFile) > 0
LMD = FileDateTime(MyPath & MyFile)
Se LMD > Ultima Data Allora
UltimoFile = MioFile
Ultima Data = LMD
Finisci se
MyFile = Dir
Ciclo continuo
Cartelle di lavoro.Apri MyPath e LatestFile
Fine sottotitolo
In questo modo, utilizzando il codice macro, potremo aprire l'ultimo file salvato dal membro del team.
Download - Come aprire il file più recente in una cartella - xlsm
