Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA: Zellbereich unter best. Bedingung löschen

VBA: Zellbereich unter best. Bedingung löschen
25.07.2014 09:58:23
Fritz_W
Hallo VBA-Kundige,
ich benötige eure Hilfe wie folgt:
Ich möchte im Tabellenblatt "Daten" den Zellbereich A2:G501 löschen (nur Inhalt, Formate sollten beibehalten werden), aber nur dann, wenn im gleichen Tabellenblatt entweder die Zelle AO1 den Text "Löschen" oder die Zelle AO2 die Zahl 500 enthält.
Sollte keine dieser Voraussetzungen erfüllt sein, sollte der Hinweis: "Löschen nicht möglich" ausgegeben werden.
Für Eure Hilfen im Voraus besten Dank.
mfg
Fritz

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Zellbereich bedingt löschen
25.07.2014 10:32:54
NoNet
Hallo Fritz,
das klappt mit diesem Code :
Sub Bereich_Inhalte_Loeschen()
If [AO1] = "Löschen" Or [AO2] = 500 Then
[A2:G501].ClearContents
Else
MsgBox "Löschen nicht möglich !"
End If
End Sub
Salut, NoNet

AW: Zellbereich bedingt löschen
25.07.2014 10:37:41
Fritz_W
Hallo NoNet,
super, ganz herzlichen Dank.
Gruß
Fritz
Anzeige

317 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige