Eigentümer auslesen
29.08.2007 09:36:00
Marek
ich möchte gerne in diesem Makro noch hinzufügen, dass Excel mir den Eigentümer der Datei angibt.
Also nicht den Namen, den man über die Optionen eingeben kann, sondern den Namen, den man auf dem System hat.
Hier der Code:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.ActiveWorkbook.Worksheets("tabelle1").Activate
Range("b1").Formula = Now
End Sub
Vielen Dank im Voraus!
MfG
Marek
Anzeige