Office - Word, Excel und Co. 9.702 Themen, 40.798 Beiträge

Verfolgung starten Optionen

Excel: Aktuellste Datei eines Verzeichnisses in Zelle speich

DerLipper / 3 Antworten / Flachansicht Nickles

hi alle
ich habe folgendes prob: ich möcvhte gerne in eine excel tabelle den namen der neusten datei eines bestimmten verzecihnissen herauslesen und dann in excel einfügen. nun will ich aber net immer selber die neuste datei herausfinden sondern wenn eine neue datei in den ordner kommt soll sich automatisch die excel tabelle ändern. es ist davon auszugehen das die excel-datei nicht dauerhaft geöffnet ist sondern nur manchmal. deshalb möchte mein chef das wenn er seine excel tabelle öffnet immer die aktuellste firmware zu einem best. produkt immer aktuell in seiner tabelle haben. mit linux wäre das echt 0 problem doch mit windows habe ich da keine ahnung...

über eine antwort hier oder per mail an stefan.kloepping@web.de würde ich mich sehr freuen.

gruss
stefan

bei Antwort benachrichtigen
Da wirst Du wohl ein bißchen VBA programmieren müssen und das Ganze in ein ... Kolti
jo das hatte ich mir gedacht nur leider kann ich kein vb : einer ne idee wie ... DerLipper
Manuela DerLipper „Excel: Aktuellste Datei eines Verzeichnisses in Zelle speich“
Optionen

Dim FName$, Datum As Date
Dim Verzeichnis As String
Dim Datei As String

Verzeichnis = Cells(1, 1).Value ' hier steht der Verzeichnisname

If Verzeichnis
FName = Dir(Verzeichnis & "\*.xls")
Datum = #1/1/60#
Do While FName ""
If FileDateTime(FName) > Datum Then
Datum = FileDateTime(FName)
Datei = FName
FName = Dir() ' nächste Datei im Verzeichnis
End If
Loop

' Datei enthält nun die aktuellste Excel-Datei im Verzeichnis

bei Antwort benachrichtigen