Ako otvoriť najnovší súbor v priečinku v programe Microsoft Excel
V prípade, že chcete kód VBA, ktorý vám umožní otvoriť nedávno uložený súbor v priečinku jednoduchým kliknutím na tlačidlo makra.
Otázka): Mám tím 10 ľudí a súrne hľadám makro, ktoré mi pomôže s otvorením najnovšieho súboru uloženého členom tímu, aby som nemusel ísť cestou, kde je súbor uložený.
Musíme postupovať podľa nasledujúcich krokov:
- Kliknite na kartu Vývojár
- V skupine Kód vyberte položku Visual Basic
- Do modulu pracovného hárka zadajte nasledujúci kód
Možnosť explicitná
Vedľajší najnovší súbor ()
Dim MyPath ako reťazec
Dim MyFile ako reťazec
Dim LatestFile as String
Dim LatestDate as Date
Dim LMD ako dátum
MyPath = "C: \ Users \ Documents \"
Ak správne (MyPath, 1) "\" Then MyPath = MyPath & "\"
MyFile = Dir (MyPath & "*.xls", vbNormal)
Ak Len (MyFile) = 0 Potom
MsgBox „Neboli nájdené žiadne súbory …“, vbExclamation
Ukončiť sub
Koniec Ak
Do Len (MyFile)> 0
LMD = FileDateTime (MyPath & MyFile)
Ak LMD> LatestDate Then
LatestFile = Môj súbor
LatestDate = LMD
Koniec Ak
MyFile = Dir
Slučka
Zošity. Otvorte aplikáciu MyPath a súbor LatestFile
Koniec pod
Takýmto spôsobom budeme môcť pomocou kódu makra otvoriť najnovší súbor uložený členom tímu.
Stiahnuť - Ako otvoriť najnovší súbor v priečinku - xlsm
