Hur man öppnar den nyaste filen i en mapp i Microsoft Excel
Om du vill ha en VBA -kod som låter dig öppna den nyligen sparade filen i mappen med bara ett klick på makroknappen.
Fråga): Jag har ett team på 10 personer och jag letar omedelbart efter ett makro som hjälper mig att öppna den senaste filen som sparats av teammedlem så att jag inte behöver gå vägen där filen sparas.
Vi måste följa stegen nedan:
- Klicka på fliken Utvecklare
- Välj Visual Basic i kodgruppen
- Ange följande kod i kalkylbladsmodulen
Alternativ Explicit
Sub Nyaste fil ()
Dim MyPath som sträng
Dim MyFile As String
Dim LatestFile As String
Dim Senaste datum som datum
Dim LMD As Date
MyPath = "C: \ Users \ Documents \"
Om rätt (MyPath, 1) "\" Då är MyPath = MyPath & "\"
MyFile = Dir (MyPath & "*.xls", vbNormal)
Om Len (MyFile) = 0 Då
MsgBox "Inga filer hittades …", vbExclamation
Avsluta Sub
Avsluta om
Gör medan Len (MyFile)> 0
LMD = FileDateTime (MyPath & MyFile)
Om LMD> Senaste datum Då
LatestFile = MyFile
Senaste datum = LMD
Avsluta om
MyFile = Dir
Slinga
Workbooks.Open MyPath & LatestFile
Avsluta Sub
På så sätt kommer vi med makrokod att kunna öppna den senaste filen som lagmedlemmen har sparat.
Ladda ner - Hur man öppnar den senaste filen i en mapp - xlsm
