Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1808to1812
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1808to1812
1808to1812
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blaue Bereichsmarkierung aufheben

Blaue Bereichsmarkierung aufheben
26.01.2021 19:09:04
Micha
Hallo,
möchte nach dem Löschvorgang die blaue Bereichsmarkierung per VBA aufheben.
Leider weiß ich nicht wie das funktioniert. Habe eine Beispieldatei beigefügt. Dort ist auch
alles Weitere beschrieben. Danke schon mal für Deinen (Euren) Einsatz.
Gruß
Micha
https://www.herber.de/bbs/user/143337.xlsm

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blaue Bereichsmarkierung aufheben
26.01.2021 19:20:39
Werner
Hallo,
Sub Loeschen()
Selection.ClearContents
If Cells(2, "A") = "" Then
Range("A2").Select
Else
Cells(Range("A1").End(xlDown).Row + 1, 1).Select
End If
End Sub
Gruß Werner
AW: Blaue Bereichsmarkierung aufheben
26.01.2021 23:08:43
Micha
Hallo Werner,
wie immer eine tolle Lösung.
Wiederum vielen Dank für Deine Bemühungen.
Alles Gute und Kopf (hinter der FFP2) hoch.
Gruß
Micha
Gerne u. Danke für die Rückmeldung. o.w.T.
27.01.2021 08:52:13
Werner
AW: Blaue Bereichsmarkierung aufheben
26.01.2021 19:21:27
ralf_b
z.b. mit Range("A1").select
AW: Blaue Bereichsmarkierung aufheben
26.01.2021 19:21:40
Hajo_Zi
Hallo Micha,
Sub Loeschen()
Selection.ClearContents
Selection.Cells(0).Activate
End Sub

Anzeige
AW: Blaue Bereichsmarkierung aufheben
26.01.2021 23:12:14
Micha
Hallo Hajo,
vielen Dank für Deine Hilfe.
Wie auch bei allen Anderen;
bleib gesund.
Gruß
Micha
AW: Blaue Bereichsmarkierung aufheben
26.01.2021 19:27:14
GerdL
Moin 
Sub Unit()
Selection.ClearContents
Cells(ActiveCell.Row, 1).Select
End Sub

Gruß Gerd
AW: Blaue Bereichsmarkierung aufheben
26.01.2021 23:10:32
Micha
Hallo Gerd,
vielen Dank für Deine Hilfe.
Funktioniert einwandfrei.
Gruß
Micha
Ps. Bleib Du bitte auch gesund :-)

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige