Ich makiere durch eine Inputbox einen Bereich der gelöscht wird. Ich habe nun 2 identische sheets. Auf sheet1 makiere ich den bereeich der gelöcht werden soll. Auf sheet2 soll im gleichen atemzug der gleiche Bereich ebenfalls gelöcht werden.
Mein code zum makieren und löschen ist wie folgt.
Set Bereich = Application.InputBox(prompt:="Bereich makieren der Abgelehnt werden soll", Type:=8)
If Bereich Is Nothing Then
MsgBox "Sie haben kein Bereich gewählt", vbExclamation
Else
Bereich.Select
MsgBox "Termine löschen?", vbOKOnly
Selection.ClearContents
Selection.ClearComments
Selection.Interior.ColorIndex = xlNone
End If
Nun finde ich aber keinen konkreten Ansatz wie ich gleichzeitig, ohne in Sheet2 den bereich nochmals zu makieren, zu löschen.