Hallo liebe Excelgemeinde, Ich hab da mal ne Frage: Kann ich eigentlich viele Exceldatein in einem „Rutsch“ die Daten, die Excel ja vom Erstellungstermin, Autor, Änderungsdaten usw. sammelt löschen oder besser verändern? Für Tipps hierfür schon jetzt Danke.
Hallo liebe Excelgemeinde, Ich hab da mal ne Frage: Kann ich
eigentlich viele Exceldatein in einem „Rutsch“ die Daten, die
Excel ja vom Erstellungstermin, Autor, Änderungsdaten usw.
sammelt löschen oder besser verändern? Für Tipps hierfür schon
jetzt Danke.
Hi Volker,
welche von den ca. 30 Eigenschaften willst du wie verändern, also was soll jeweils der neue Wert sein?
Öffne mal eine Datei die viele Eigenschaften angesammelt hat und lasse den Code ablaufen, der Datei geschieht nichts, es wird „hinten“ ein neues Blatt angheängt, darauf stehen die vorhandenen Eigenschaften der Mappe. Das kannts du ja anschließend löschen oder die Mapp eungespeichert schließen, dann ist das Blatt auch weg.
Sub Eigenschaften()
Dim p, Zei
On Error Resume Next
Worksheets.Add after:=Worksheets(Worksheets.Count)
For Each p In ActiveWorkbook.BuiltinDocumentProperties
Cells(Zei + 1, 1).Value = p.Value
Cells(Zei + 1, 2).Value = p.Name
Zei = Zei + 1
Next
Columns(1).AutoFit
End Sub
Gruß
Reinhard
Hallo Reinhard,
Danke für den Code. Hier werden ja irre viel Daten gesammelt!!!
Sollte jeder wissen!!!
Aber jetzt zu meinem Wunsch: Ich möchte eigentlich „alle“ diese Daten löschen, bzw. auf Null stellen.