25.11.2015, 15:29
Moin!
Die Aufgabe ist ja nicht gerade neu:
Wie verstecke ich Informationen (beispielsweise ein Copyright) so in einer Datei, dass sie auch ein geübter Anwender nicht ohne weiteres sieht und sie entfernen oder ändern kann.
Mit:
Lösche ich obiges Makro wieder, muss man schon Hellseher sein, um zu wissen, dass da etwas versteckt wurde.
Das Auslesen ist einfach:
Vielleicht kann ja der eine oder andere was damit anfangen ...
Im Übrigen kann man die Indizes ja mit ähnlichen Daten füllen, relevant ist als Beispiel nur die Kombination (8).Name und (3).Value
Gruß Ralf
Die Aufgabe ist ja nicht gerade neu:
Wie verstecke ich Informationen (beispielsweise ein Copyright) so in einer Datei, dass sie auch ein geübter Anwender nicht ohne weiteres sieht und sie entfernen oder ändern kann.
Mit:
Sub AddCustProp()schreibe ich Informationen in die Datei, die man nirgendwo in der Anwendung, auch nicht in den Eigenschaften der Tabelle (VBA-Editor) sehen kann (Name:= und Value:=).
Tabelle1.CustomProperties.Add "Ersteller", "RPP63"
End Sub
Lösche ich obiges Makro wieder, muss man schon Hellseher sein, um zu wissen, dass da etwas versteckt wurde.
Das Auslesen ist einfach:
Sub ReadCustProp()
With Tabelle1
MsgBox .CustomProperties(1).Name & Chr(13) & .CustomProperties(1).Value
End With
End Sub
Vielleicht kann ja der eine oder andere was damit anfangen ...
Im Übrigen kann man die Indizes ja mit ähnlichen Daten füllen, relevant ist als Beispiel nur die Kombination (8).Name und (3).Value
Gruß Ralf