Per VBA Eigenschaften ändern?

Forumthread: Per VBA Eigenschaften ändern?

01.02.2018 17:40:41

Lars

Hallo Forenmitglieder,
Ist es möglich Per VBA Informationen zur Datei hinzuzufügen? Konkret meine ich Titel und Kommentare, also in einer geöffneten Datei auf "Datei", dann im Reiter "Informationen" auf der rechten Seite befindlich sind dann Titel, Tags, Kategorien etc.
Ich habe versucht etwas per Rekorder aufzunehmen, allerdings ohne Erfolg. Daher die Frage, ob das überhaupt funktioniert wie ich mir das vorstelle.
MfG Lars

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Per VBA Eigenschaften ändern?

01.02.2018 17:46:49

Hajo_Zi

AW: Per VBA Eigenschaften ändern?

01.02.2018 17:46:49

Hajo_Zi

Hallo Lars,

Sub Eigenschaften_in_Zelle2()
ActiveWorkbook.BuiltinDocumentProperties(1).Value = Now
End Sub

Tabelle1

	A
1	Title
2	Subject
3	Author
4	Keywords
5	Comments
6	Template
7	Last author
8	Revision number
9	Application name
10	Last print date
11	Creation date
12	Last save time
13	Total editing time
14	Number of pages
15	Number of words
16	Number of characters
17	Security
18	Category
19	Format
20	Manager
21	Company
22	Number of bytes
23	Number of lines
24	Number of paragraphs
25	Number of slides
26	Number of notes
27	Number of hidden Slides
28	Number of multimedia clips
29	Hyperlink base
30	Number of characters (with spaces)

Excel-Inn.de

Hajo-Excel.de

XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007

Add-In-Version 25.14 einschl. 64 Bit

Ich gebe keinen Dank für eine Rückmeldung, da ich durch solche Beiträge nicht meine Beitragszahl erhöhen muss.
Also ich schreibe keine Beiträge mit dem Betreff "Gerne u. Danke für die Rückmeldung....."
Rückmeldung ist ja in der Heutigen Zeit nicht üblich und die wenigen die eine Rückmeldung geben,
mögen mir das verzeihen, das kein Danke für eine Rückmeldung kommt.
Beiträge von Werner, Luc, robert und folgende lese ich nicht.

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um die Eigenschaften einer Excel-Datei per VBA zu ändern, kannst Du die folgenden Schritte befolgen:

Öffne Excel und drücke ALT + F11, um den VBA-Editor zu starten.
Erstelle ein neues Modul: Klicke mit der rechten Maustaste im Projektfenster auf "VBAProject (DeineDatei.xlsx)" und wähle Einfügen > Modul.

Füge den folgenden Code ein:

Sub Eigenschaften_aendern()
   With ActiveWorkbook
       .BuiltinDocumentProperties("Title") = "Neuer Titel"
       .BuiltinDocumentProperties("Comments") = "Neuer Kommentar"
       .BuiltinDocumentProperties("Keywords") = "Keyword1, Keyword2"
   End With
End Sub

Führe das Makro aus: Schließe den VBA-Editor und gehe zurück zu Excel. Drücke ALT + F8, wähle Eigenschaften_aendern aus und klicke auf Ausführen.

Damit werden die Eigenschaften der aktuellen Arbeitsmappe geändert. Achte darauf, dass Du die richtigen Bezeichner für die Eigenschaften verwendest.

Häufige Fehler und Lösungen

Fehler: "Objektvariable oder With-Blockvariable nicht festgelegt."
- Lösung: Stelle sicher, dass Du eine Arbeitsmappe geöffnet hast, bevor Du das Makro ausführst.
Fehler: "Der Name der Eigenschaft ist ungültig."
- Lösung: Überprüfe, ob Du die richtigen Namen für die Eigenschaften (z.B. "Title", "Comments", "Keywords") verwendest.

Alternative Methoden

Wenn Du keine VBA-Programmierung nutzen möchtest, kannst Du die Dateieigenschaften auch manuell ändern:

Klicke auf "Datei" in der oberen linken Ecke.
Wähle "Informationen".
Klicke auf "Eigenschaften" und dann auf "Erweiterte Eigenschaften".
Ändere die gewünschten Felder (Titel, Kommentare, Schlüsselwörter) im Tab "Zusammenfassung".

Praktische Beispiele

Hier sind einige Beispiele für die Verwendung von VBA zur Änderung von Eigenschaften:

Titel ändern:

Sub Titel_aendern()
   ActiveWorkbook.BuiltinDocumentProperties("Title") = "Mein neuer Titel"
End Sub

Kommentare hinzufügen:

Sub Kommentare_hinzufuegen()
   ActiveWorkbook.BuiltinDocumentProperties("Comments") = "Dies ist ein Kommentar."
End Sub

Schlüsselwörter festlegen:

Sub Schlüsselwoerter_setzen()
   ActiveWorkbook.BuiltinDocumentProperties("Keywords") = "Excel, VBA, Programmierung"
End Sub

Tipps für Profis

Nutze Option Explicit am Anfang Deines Moduls, um sicherzustellen, dass alle Variablen deklariert sind und Fehler durch Tippfehler vermieden werden.
Experimentiere mit anderen BuiltInDocumentProperties, um zusätzliche Informationen zu Deiner Arbeitsmappe zu speichern.
Erstelle eine Benutzeroberfläche, um die Eingabe von Eigenschaften zu erleichtern, indem Du UserForms in VBA verwendest.

FAQ: Häufige Fragen

1. Kann ich die Eigenschaften auch für mehrere Arbeitsmappen gleichzeitig ändern? Ja, Du kannst eine Schleife verwenden, um durch eine Sammlung von Arbeitsmappen zu iterieren und die Eigenschaften nacheinander zu ändern.

2. Welche Excel-Version wird benötigt? Die beschriebenen Methoden funktionieren in Excel 2007 und späteren Versionen. Stelle sicher, dass Du die VBA-Funktionalität aktiviert hast.

Beliebteste Forumthreads (12 Monate)