Variablen Zellinhalt löschen

Forumthread: Variablen Zellinhalt löschen
2 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Variablen Zellinhalt löschen

20.01.2025 20:56:02

peter

Hallo Forum, sorry, aber stehe gerade voll daneben.
Ich möchte den Zellinhalt von Spalte F bis I löschen, wenn der Wert in Spalte I > 2 ist.
Wie ist dazu die Syntax.
Bitte um kurze Hilfe.
Danke Gruß Peter

For t = lz To 2 Step -1 'Zählung rückwärts bis Zeile 2
'Abfragen, ob in der neuten Spalte der Wert größer 2 steht
If Cells(t, 9).Value > 2 Then
Cells(t, "F":"I").ClearContents
End If
Next t

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Variablen Zellinhalt löschen

20.01.2025 21:11:12

GerdL
AW: Variablen Zellinhalt löschen

20.01.2025 22:00:10

Yal

AW: Variablen Zellinhalt löschen

20.01.2025 21:11:12

GerdL

Moin Peter,

...Then
Cells(t, 6).Resize(1, 4).ClearContents
,,,,,

Wenn du keine Zellen löscht, sondern nur Inhalte, kannst du die Schleife auch vorwärts laufen lassen.

Gruß Gerd

AW: Variablen Zellinhalt löschen

20.01.2025 22:00:10

Yal

Moin,

würde so machen:

Sub Inhalte_löschen()

    For Each Z In Intersect(Range("F:I"), ActiveSheet.UsedRange)

        If Z.Value > 2 Then Z.ClearContents

    Next

End Sub

Wenn in Zellen nur Formeln enthalten, dann so:

Sub Inhalte_löschen()

Dim Z As Range

    For Each Z In Range("F:I").SpecialCells(xlCellTypeFormulas)

        If Z.Value > 2 Then Z.ClearContents

    Next

End Sub

Wenn nur "feste" Zahlen (also kein Formeln):

Sub Inhalte_löschen()

Dim Z As Range

    For Each Z In Range("F:I").SpecialCells(xlCellTypeConstants)

        If Z.Value > 2 Then Z.ClearContents

    Next

End Sub

VG
Yal

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!