Änderungen verfolgen
23.09.2020 11:56:04
Hans
habe in meiner Datei Abrufmengen die immer wöchentlich angepasst werden. Um die Änderungen nachverfolgen zu können sollen diese am besten in der Zelle angezeigt werden.
Allerdings sind manchmal noch Änderungen an der Datei notwendig. Zum Nachverfolgen über die Excelfunktion muß die Datei freigegeben sein und zum ändern muß man das wieder aufheben.
Deshalb meine Frage ob man ein Script schreiben kann bei dem nur wenn ich die Datei ändern möchte
Abfrage beim Öffnen
Private Sub Workbook_Open()
If MsgBox("Dokument bearbeiten?", vbYesNo) = vbYes Then
ActiveWorkbook.SaveAs "U:\USER\Matthias Arlt\Automotive\Abrufe\Automobilaufstellung " & Format( _
Now, "yyyy.mm.dd") & ".xls"
End If
End Sub
also "ja" klickt dann eine freigegebene Datei wird mit Datum abgespeichert bei der die Änderungen zum letzten Stand nachvollziehbar sind.Danke schonmal für die Hilfe
Gruß Hans