Auch Werte in ausgeblendeten Zellen löschen
19.11.2018 15:18:02
stormlamp
dieses Script
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 2 Then
Cancel = True
Columns(2).ClearContents '--Loescht alles in SpalteB
Target = "x" '--setzt ein X
End If
End Sub
Es werden jedoch nicht die Zellen ind Spalte B gelöscht, wenn Zeilen mittels Filter ausgeblendet wurden. Kann man das Script modifizieren, sodass auch die ausgeblendeten Zellen gelöscht werden, ohne jedoch den Filter aufzuheben?
Viele Grüße
Hans