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

Datei Eigenschaften ändern

Forumthread: Datei Eigenschaften ändern

Datei Eigenschaften ändern
29.07.2007 18:32:00
Egon
Hallo Excel-/VBA-Freunde,
ich brauch mal eure Hilfe. Ich habe mir eine Liste erstellt mit den Werten aus der Dateiinfo (Dateiname, Autor, Größe, Kommentare usw) von diversen Dateien (jpg, png).
Kann man auch auf die Datei zugreifen, um einzelne Werte wie Autor und Kommentare zu ändern?
Viele Grüße
Egon

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datei Eigenschaften ändern
29.07.2007 19:21:36
Nepumuk
Hallo Egon,
das geht nur per DSOleFile. Lade dir die dsofile.dll runter und registriere sie. Hier mal ein kleines Beispiel wie du dann ändern kannst:
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Public Sub prcWrite_Property()
    Dim objFSO As Object, objFile As Object
    Dim objFilePropReader As DSOleFile.PropertyReader
    Dim objDocProp As DSOleFile.DocumentProperties
    Set objFilePropReader = New DSOleFile.PropertyReader
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    For Each objFile In objFSO.GetFolder("D:\EVM\Backups\").Files
        Set objDocProp = objFilePropReader.GetDocumentProperties(objFile.Path)
        objDocProp.Author = "Neuer Autor"
        objDocProp.Comments = "Neuer Kommentar"
    Next
    Set objFilePropReader = Nothing
    Set objDocProp = Nothing
End Sub

Gruß
Nepumuk
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Datei Eigenschaften in Excel ändern


Schritt-für-Schritt-Anleitung

Um die Dateieigenschaften in Excel zu ändern, insbesondere den Autor, kannst Du den folgenden VBA-Code verwenden. Stelle sicher, dass Du die dsofile.dll heruntergeladen und registriert hast. Hier sind die Schritte:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und wähle Modul aus.

  3. Füge den folgenden Code in das Modul ein:

    Option Explicit
    
    Public Sub prcWrite_Property()
       Dim objFSO As Object, objFile As Object
       Dim objFilePropReader As DSOleFile.PropertyReader
       Dim objDocProp As DSOleFile.DocumentProperties
       Set objFilePropReader = New DSOleFile.PropertyReader
       Set objFSO = CreateObject("Scripting.FileSystemObject")
    
       For Each objFile In objFSO.GetFolder("D:\EVM\Backups\").Files
           Set objDocProp = objFilePropReader.GetDocumentProperties(objFile.Path)
           objDocProp.Author = "Neuer Autor"
           objDocProp.Comments = "Neuer Kommentar"
       Next
    
       Set objFilePropReader = Nothing
       Set objDocProp = Nothing
    End Sub
  4. Ändere den Pfad in der Zeile GetFolder("D:\EVM\Backups\") zu dem Ordner, der Deine Dateien enthält.

  5. Passe die Werte für Author und Comments nach Deinen Bedürfnissen an.

  6. Führe das Skript aus, um die Dateieigenschaften zu ändern.


Häufige Fehler und Lösungen

  • Fehler: "dsofile.dll nicht gefunden"

    • Lösung: Stelle sicher, dass Du die DLL-Datei heruntergeladen und korrekt registriert hast.
  • Fehler: "Zugriff verweigert"

    • Lösung: Überprüfe, ob Du die erforderlichen Berechtigungen für den Zugriff auf die Datei hast.
  • Fehler: "Objekt nicht gefunden"

    • Lösung: Überprüfe den angegebenen Pfad und stelle sicher, dass die Dateien vorhanden sind.

Alternative Methoden

Eine andere Möglichkeit, die Dateieigenschaften zu ändern, besteht darin, die Eigenschaften direkt über die Windows-Oberfläche zu bearbeiten:

  1. Klicke mit der rechten Maustaste auf die Datei.
  2. Wähle Eigenschaften.
  3. Gehe zum Tab Details.
  4. Klicke auf Eigenschaften bearbeiten und ändere den Autor und die Kommentare.

Diese Methode ist jedoch weniger automatisiert und kann zeitaufwändig sein, wenn Du viele Dateien bearbeiten musst.


Praktische Beispiele

  • Beispiel 1: Ändere den Autor für mehrere Bilder in einem Ordner.
  • Beispiel 2: Füge Kommentare zu Dokumenten hinzu, um eine bessere Nachverfolgbarkeit zu gewährleisten.

Verwende den oben genannten VBA-Code, um diese Aufgaben effizient zu erledigen.


Tipps für Profis

  • Automatisierung: Du kannst den VBA-Code in ein Makro umwandeln, das Du mit einem Tastenkürzel aufrufen kannst.
  • Fehlerbehandlung: Füge Fehlerbehandlungsroutinen in Deinen Code ein, um unerwartete Probleme während der Ausführung zu vermeiden.
  • Backup: Mache immer eine Sicherungskopie Deiner Dateien, bevor Du Massenänderungen vornimmst.

FAQ: Häufige Fragen

1. Wie kann ich den Autor in Excel ändern?
Du kannst den Autor in Excel ändern, indem Du den VBA-Code verwendest, der die dsofile.dll nutzt, um auf die Dateieigenschaften zuzugreifen.

2. Welche Excel-Version benötige ich?
Der oben beschriebene VBA-Code sollte in den meisten modernen Excel-Versionen funktionieren, einschließlich Excel 2016 und neuer. Stelle sicher, dass Du die dsofile.dll korrekt registrierst, um Fehler zu vermeiden.

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