Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
604to608
604to608
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dateieigenschaften auslesen

Forumthread: Dateieigenschaften auslesen

Dateieigenschaften auslesen
30.04.2005 01:47:30
Walter
Moin an Alle,
da ich schon im Forum rumlese :-) noch ne Frage:
zwecks aufräumens von Serververzeichnissen (ne ganz dankbare Aufgabe :-) ) meiner Jungs + Mädels suche ich ein Makro zur Hyperlinkerstellung (das hab ich gefunden) das aber zusätzlich zum Link alle Dateiegenschaften wie Pfad, Ersteller, Ertellungsdatum, letzte Änderung, letzte Änderung/Speicherung durch...., Größe etc...jeweils in eine Spalte schreibt.
mit Dank im Voraus
Walter
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateieigenschaften auslesen
30.04.2005 08:43:47
ransi


      
Hallo walter
schau mal hier ob du damit was anfangen kannst:
Sub Dateieigenschaften()
'von k.rola
Const STRFOLDER As String = "d:\Eigene Dateien" 'anpassen
Dim objShell As Object
Dim objFolder As Object
Dim x As Byte
Dim spalte As Integer
Dim zeile As Long
Dim varName, arrHeaders(34)
If Dir(STRFOLDER, 16) = "" Then
MsgBox "Der Ordner " & STRFOLDER & " wurde nicht gefunden!" & Space(10), 64, "weise hin..."
Exit Sub
End If
Application.ScreenUpdating = False
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(STRFOLDER)
spalte = 1
For x = 0 To 33
arrHeaders(x) = objFolder.GetDetailsOf(varName, x)
Cells(1, spalte + x) = arrHeaders(x)
Next
Rows(1).Font.Bold = True
zeile = 2
For Each varName In objFolder.Items
For x = 0 To 33
Cells(zeile, spalte + x) = objFolder.GetDetailsOf(varName, x)
Next
zeile = zeile + 1
Next
Columns.AutoFit
Application.ScreenUpdating = True
End Sub
ransi 
Anzeige
AW: Danke ransi - hab auch sowas gesucht!! o.T.
05.05.2005 00:24:34
Walter
Hallo Ransi,
sorry für späte Reaktion, war'n paar Tage nicht anwsend. Werd ich testen.
Gruß
Walter
Anzeige
;

Forumthreads zu verwandten Themen

Dateieigenschaften auslesen
Jo-Lus

Hallo Leute,wie kann ich unter Excel 2000 die Datei- Eigenschaften z.B. Titel
Bauteilnummer (Autodesk Inventor Dateien) auslesen bzw. schreiben und in einer Excel Datei speichern.Das Ziel soll sein Stücklisten erstellen und verwalten.Danke


03.05.2002 21:56:09
Thread-ID: 118360
3 Beiträge
Dateieigenschaften auslesen
Andrea

Ich möchte das Änderungsdatum und die Dateigröße mit VBA auslesen, ohne daß ein zusätzliches Pgm auf meinem PC installiert werden muß.

Danke !!

Andrea
29.07.2003 17:02:35
Thread-ID: 287291
2 Beiträge
Dateieigenschaften auslesen
ralph
Hallo zusammen!

Wie kann ich die Dateieigenschaften auslesen? Speziell möchte ich die Eigenschaft "Zuletzt gespeichert von" / "geändert" auswerten.

Kann auch ein Makro sein, das beim öffnen automatisch ausgeführt wird.
Danke!
07.11.2003 11:32:14
Thread-ID: 334755
5 Beiträge
Anzeige
Dateieigenschaften auslesen
Frank

Hallo Forum,
ich würde gern die Dateieigenschaften in einem bestimmten Ordner auslesen.
Es sind nicht nur Exceldateien. Dabei sollten die Dateien nicht geöffnet
werden müssen. Leider hab ich keine Ahnung, wie das geht und ob überhaupt.
Gruß Frank
08.11.2004 22:48:52
Thread-ID: 514151
7 Beiträge
Dateieigenschaften auslesen
Frank
Hallo Forum,
ich würde gern die Dateieigenschaften in einem bestimmten Ordner auslesen.
Es sind nicht nur Exceldateien. Dabei sollten die Dateien nicht geöffnet
werden müssen. Leider hab ich keine Ahnung, wie das geht und ob überhaupt.
Ich meine die Eigenschaften, die man auch im Exp...
10.11.2004 19:06:47
Thread-ID: 515483
6 Beiträge
Dateieigenschaften auslesen
Peter

Guten Abend, liebe Excelfreunde !
Dies ist mein erster Beitrag hier - und wenn ich die gesuchte Lösung in diesem Forum noch nicht gefunden habe, obwohl sie vielleicht schon da ist, dann bitte ich um Nachsicht, ich war nicht zu faul zum Suchen.
Ich arbeite an einer Anwendung, die mir mei...
09.09.2020 23:16:31
Thread-ID: 1781429
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige