Wer hat die Lösung. Lt. Google müsste sowas gelingen.
Das Blatt ist aktiv.....:
Worksheets(ws.Name).Cells.Clear
Worksheets(ws.Name).UsedRange.ClearContents
With Sheets(ws.Name).Cells.Clear
End With
With Sheets(ws.Name)
.UsedRange.ClearContents
End With
With Sheets (ws.Name)
.UsedRange.Select
Selection.ClearContents
End With
geht aber alles nicht.
DANKE und mfg
LG STeve