Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Ausgabe von letztem Speicherdatum etc. |
23.06.2014 15:41:05 |
Volker |
|
|
|
23.06.2014 17:44:01 |
Holger |
|
|
|
24.06.2014 10:33:12 |
Gast57766 |
|
|
|
25.06.2014 15:39:04 |
Holger |
|
|
|
28.06.2014 14:22:29 |
Volker |
|
|
Von:
Volker |
Datum:
23.06.2014 15:41:05 |
Views:
1266 |
Rating:
|
Antwort:
|
Thema:
Ausgabe von letztem Speicherdatum etc. |
Hallo Zusammen,
im Rahmen meiner Diplomarbeit zum Thema Wissensmanagement würde ich gerne ein Makro erstellen, welches mir verschiedene Informationen verschiedener Dateien auflistet.
Bei den Dateien handelt es sich jedoch sowohl um Excel- als auch um Word-Dateien.
Das Auslesen von Dateiname und -pfad ist kein Problem. Schwieriger gestaltet es sich allerdings bei Ersteller bzw. Autor, letztem Zugriffsdatum und letztem Speicher- bzw. Aktualisierungsdatum.
Mein Code sieht bisher folgendermaßen aus:
Private Sub CommandButton1_Click()
Dim Blatt As Worksheet
Dim Pfad As String
Dim DatNam As String
Dim i As Integer
Set Blatt = ThisWorkbook.Worksheets("Tabelle1")
Pfad = "D:\Diplomarbeit\Dokumentation CR-Intern\Sonstiges\"
DatNam = Dir(Pfad)
With Blatt
i = 4
Do While DatNam <> ""
.Cells(i, 1) = DatNam
.Cells(i, 2) = Pfad
'.Cells(i,3) = Autor/Ersteller der Datei auslesen
'.Cells(i, 4) = Datum des letzten Zugriffs auslesen
'.Cells(i, 5) = Datum der letzten Aktualisierung/Änderung/Speicherung auslesen
i = i + 1
DatNam = Dir
Loop
End With
End Sub
Über Tipps und Hilfe bzgl. meines Problems wäre ich sehr dankbar.
MfG
Volker
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Ausgabe von letztem Speicherdatum etc. |
23.06.2014 15:41:05 |
Volker |
|
|
|
23.06.2014 17:44:01 |
Holger |
|
|
|
24.06.2014 10:33:12 |
Gast57766 |
|
|
|
25.06.2014 15:39:04 |
Holger |
|
|
|
28.06.2014 14:22:29 |
Volker |
|
|