Nach drucken wert einer Zelle um 1 erhöhen!
25.11.2002 08:41:38
Stephan
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Worksheets("Tabelle1").Range("C8") = Worksheets("Tabelle1").Range("C8") + 1
End Sub
In EXCEL funktionier es aber Word nicht.
Zur Situation ich habe eine EXCEL Tabelle mit mehreren
Funktionen in ein Word Dokument eingefügt
und wenn ich da auf drucken drücke erhöht sich der Wert
nicht.
Wie kann ich kann ich nun daa ändern damit es funktioniert?