Ich hab ein Rechnungsformular, in das bestimmte Schlüssel eingegeben werden. Der Inhalt dieser Schlüsselzellen (Zellen p9-p12, p14-p22 und q14-q22) sollen nachdem ich auf Drucken klickt habe, gelöscht werden.
Wie kann ich das machen?
LG,
Pascal
Private Sub Workbook_Open()
Range("H14").Value = _
ExecuteExcel4Macro("Get.Document(50)")
End Sub
Sub Drucken()
Worksheets(1).PrintOut
Worksheets(1).Range("H11") = Worksheets(1).Range("H11") + 1
[p9:p12, p14:p22,q14:q22].ClearContents
End Sub