Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Dateieigenschaften in Zellen anzeigen

Dateieigenschaften in Zellen anzeigen
SLinder
Hallo Zusammen,
Unter dem Menüpunkt Datei-Eigenschaften kann man den Titel, Thema, Autor usw. eintragen.
Ich möchte gerne eine dieser Informationen in einer Zelle anzeigen.
Bei Word habe ich die Möglichkeit über Einfügen-Feld dieses zu realisieren.
Leider finde ich dieses in Excel nicht.
Vielen Dank im voraus für Eure Hilfe
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Dateieigenschaften in Zellen anzeigen
Werner
Hallo ?
Füge ein leeres Arbeitsblatt ein, und lass das Makro laufen!
Es liest alle Eigenschaften ein.

Sub Eigenschaften()
Dim rw, p
On Error Resume Next
rw = 1
Worksheets(1).Activate
For Each In ActiveWorkbook.BuiltinDocumentProperties
    Cells(rw, 1).Value = p.Name
    Cells(rw, 4).Value = p.Value
    rw = rw + 1
Next
Gruss Werner
End Sub
Anzeige
AW: Dateieigenschaften in Zellen anzeigen
21.04.2004 21:58:00
SLinder
Vielen Dank Werner für die schnelle Nachricht.
Ich werde es sofort probieren
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Dateieigenschaften in Zellen anzeigen


Schritt-für-Schritt-Anleitung

Um Dateieigenschaften in Zellen anzuzeigen, kannst du ein einfaches Makro in Excel verwenden. Hier sind die Schritte, die du befolgen solltest:

  1. Öffne Excel und erstelle ein neues Arbeitsblatt.

  2. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  3. Füge ein neues Modul hinzu:

    • Klicke auf Einfügen > Modul.
  4. Füge den folgenden Code ein:

    Sub Eigenschaften()
       Dim rw, p
       On Error Resume Next
       rw = 1
       Worksheets(1).Activate
       For Each p In ActiveWorkbook.BuiltinDocumentProperties
           Cells(rw, 1).Value = p.Name
           Cells(rw, 4).Value = p.Value
           rw = rw + 1
       Next
    End Sub
  5. Schließe den VBA-Editor und kehre zu deinem Arbeitsblatt zurück.

  6. Führe das Makro aus:

    • Drücke ALT + F8, wähle Eigenschaften aus und klicke auf Ausführen.

Nach der Ausführung des Makros werden die Dateieigenschaften in den Zellen des Arbeitsblattes angezeigt.


Häufige Fehler und Lösungen

  • Fehler: Makro wird nicht ausgeführt

    • Stelle sicher, dass Makros in deinen Excel-Einstellungen aktiviert sind. Gehe zu Datei > Optionen > Sicherheitscenter und ändere die Einstellungen unter Makro-Einstellungen.
  • Fehler: Zellen bleiben leer

    • Überprüfe, ob das aktive Workbook tatsächlich Dateieigenschaften enthält. Manchmal können leere oder nicht gespeicherte Arbeitsmappen keine Eigenschaften aufweisen.

Alternative Methoden

Falls du kein Makro verwenden möchtest, kannst du die Eigenschaften auch manuell ablesen:

  1. Gehe zu Datei > Informationen.
  2. Wähle Eigenschaften und dann Erweiterte Eigenschaften.
  3. Kopiere die gewünschten Informationen und füge sie manuell in die Zellen ein.

Diese Methode ist etwas mühsamer, aber sie funktioniert ohne VBA.


Praktische Beispiele

Wenn du beispielsweise den Autor der Datei in einer Zelle anzeigen möchtest, kannst du den VBA-Code anpassen:

Sub AutorEinfügen()
    Dim autor As String
    autor = ActiveWorkbook.BuiltinDocumentProperties("Author")
    Cells(1, 1).Value = "Autor: " & autor
End Sub

Mit diesem Makro wird der Autor der Datei in Zelle A1 angezeigt.


Tipps für Profis

  • Automatisiere die Aktualisierung: Du kannst das Makro so anpassen, dass es automatisch ausgeführt wird, wenn die Arbeitsmappe geöffnet wird. Verwende dazu das Workbook_Open-Ereignis im ThisWorkbook-Modul.

  • Verwende Named Ranges: Wenn du die Ergebnisse in bestimmten Zellen benötigen, kannst du benannte Bereiche erstellen, um die Daten dynamisch zu referenzieren.


FAQ: Häufige Fragen

1. Wie kann ich den Titel und das Thema der Datei in Zellen einfügen? Du kannst den Originalcode leicht anpassen, um die gewünschten Eigenschaften wie Title oder Subject anzuzeigen, indem du den Namen der Eigenschaft im Code änderst.

2. Funktioniert dieses Verfahren in allen Excel-Versionen? Ja, das Makro sollte in Excel 2010 und neueren Versionen funktionieren. Bei älteren Versionen kann es zu Abweichungen kommen. Stelle sicher, dass alle Optionen für Makros aktiviert sind.

Beliebteste Forumthreads (12 Monate)

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