nach dem erfolgreichen Tipp mit dem "Zeitstempel" noch ein Problem:
Ich möchte mit einem klick auf einem Button die Datei speichern, ein Diagramm ausdrucken und Werte aus einer Tabelle löschen.
Bis jetzt bin mit dem Makrorekorder soweit gekommen:
Sub Protkoll_drucken()
' Protkoll_drucken Makro
' Makro am 10.10.2005 von Franz aufgezeichnet
Sheets("Tabelle2").Select
ActiveWindow.SmallScroll Down:=-6
Sheets("Tabelle1").Select
Columns("A:F").Select
Selection.EntireColumn.Hidden = False
Sheets("Tabelle2").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Tabelle1").Select
Columns("D:E").Select
Range("E1").Activate
Selection.EntireColumn.Hidden = True
Range("B2:B51").Select
Selection.ClearContents
Range("C2:C51").Select
Selection.ClearContents
Columns("B:B").Select
Selection.EntireColumn.Hidden = True
Range("C2").Select
End Sub
Ich habe auch noch Spalten ausgeblendet, damit die beim Eingeben nicht verwirren. Die werden vor dem Ausdruck eingeblendet und dann wieder ausgeblendet.
Ich habe auch mal die Tabelle beigelegt (https://www.herber.de/bbs/user/27359.xls). Ist vielleicht verständlicher wenn man das Ganze sieht.
Mit den bisherigen Beiträgen zum Thema Speichern bin ich nicht weiter gekommen.
Hat jemand eine Idee oder einen Tipp?
Schon Mal danke im Vorraus.
Franz