verfaßt von manes , Köln, 13.02.2021, 11:01:50
Kleine Berichtigung. Statt letzten muss es letzte heißen
> With wsh_q
> If .Range("A11") <> "" Then
> letzte = .Range("A65536").End(xlUp).Row
> .Range("A11:N" & letzten).Clear
> End If
> End With
--
Also wenn ich ehrlich sein sollte, müsste ich lügen!
gesamter Thread: