Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1604to1608
1604to1608
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellfarbe ändern wenn Zeile markiert ist

Forumthread: Zellfarbe ändern wenn Zeile markiert ist

Zellfarbe ändern wenn Zeile markiert ist
25.01.2018 15:01:08
Micha
Hallo,
ich habe den untenstehenden Code gefunden.
Dieser Code färbt die komplette Zeile, wenn nur eine Zelle angeklickt wird.
Das funktioniert soweit Prima. Ich möchte aber, dass nur die Zelle in Spalte „B“ farbig wird, anstatt die komplette Zeile.
Ich hoffe jemand kann mir den Code anpassen.
Vielen lieben Dank,
Micha
Dim Merk, Farbe 

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Merk  "" Then Rows(Merk).Interior.ColorIndex = Farbe
If Intersect(Target, Range("C5:J30")) Is Nothing Then Exit Sub
Merk = Target.Row
Farbe = Target.Interior.ColorIndex
Rows(Target.Row).Interior.ColorIndex = 20
End Sub

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellfarbe ändern wenn Zeile markiert ist
25.01.2018 15:34:58
Mullit
Hallo,
probiers mal hiermit: 
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Static slngMerk As Long
If slngMerk  0 Then Cells(slngMerk, 2).Interior.ColorIndex = xlNone
If Not Intersect(Target, Range("C5:J30")) Is Nothing Then
slngMerk = Target.Row
Cells(slngMerk, 2).Interior.Color = RGB(204, 255, 255)
End If
End Sub
Gruß, Mullit
Anzeige
AW: Zellfarbe ändern wenn Zeile markiert ist
25.01.2018 15:40:52
Micha
Hallo lieber Mullit,
VIELEN LIEBEN DANK!
DAS FUNKTIONIERT PERFEKT!
Du hast mir den Tag gerettet :-)
Ciao, und nochmals DANKE
Micha
AW: prima, freut mich...owT
25.01.2018 15:47:45
Mullit
;

Forumthreads zu verwandten Themen

verlinkte Zellen von nicht verlinkten unterscheide
nicht

Guten Morgen Forum,
Ich möchte gerne aus einem Excel sheet, in dem ein sehr großer zusammenhängender Bereich mit einem anderen Sheet verlinkt ist, einen kleinen Bereich automatisiert selektieren, um daraus ein Chart zu erstellen.
Die Verlinkungen des kleinen Bereichs greifen auf Daten...
13.07.2009 09:15:44
Thread-ID: 1088118
9 Beiträge
Anzeige
Textfeld Farbe ändern
wolfgang

Hallo allerseits,
kann man die Farbe von einem Textfeld ändern ?
Dieses Makro steuere ich mit drücken auf Textfeld_1.
Die Grundfarbe ist Grau, wollte gern die Grundfarbe Grün
setzen wenn gedrückt wurde.
Wenn man ein anderes Textfeld (insgesamt 01 bis 06) drückt soll die Grun...
29.01.2019 16:50:51
Thread-ID: 1671939
2 Beiträge
aus Excel in Worddokument Textfeld ändern
Peter

Hallo,
ich habe eine Exceldatei und ein Worddokument.
Zwischen den beiden Elementen besteht eine Verknüpfung.
Wenn ich nun den Ordner mit diesen Dateien kopiere und umbenenne, ist die Verknüpfung nicht mehr richtig.
Wie kann ich die Felder in Word mittels Excel suchen und den Pf...
24.10.2019 18:03:36
Thread-ID: 1719547
9 Beiträge
Beschriftungsfeld farbe ändern wenn Zell
Herbert

Hallo meine Lieben,
ich hatte gestern Abend versucht, das ein Beschriftungsfeld(Label) seine Farbe dann ändert wenn sich in einer Zelle die Hintergrundsfarbe ändert. Aber irgendwie wollte das nicht so funktionieren wie ich wollte und dann hatte ich es ausprobiert mit den Daten die in der Ze...
20.02.2020 09:06:48
Thread-ID: 1741442
7 Beiträge
Anzeige
Zellfarbe verändern, wenn Filter aktiv i
Manfred

Hallo, liebe Leute!
Wie im Betreff geschrieben, möchte ich jene Spalte, die gefiltert wird, anders färbig.
Auf der Suche nach einer Lösung stieß ich auf einen Foreneintrag aus 2007, der zu diesem Thema folgende VBA-Lösung anbot.
Beim Hineinkopieren in meine Exceldatei passiert aber...
19.04.2021 12:27:09
Thread-ID: 1826602
2 Beiträge
Hintergrundfarbe Textfeld ändern
sigrid
Guten Morgen,
ich habe folgende Zeilen, für die Schrift zu verändern,
klappt aber Textfeld Hintergrundfarbe nicht.
Kann man auch den Text ändern?
das funktioniert nicht, die Schrift ja !
ActiveSheet.Shapes("Textfeld100").BackColor = vbRed
ActiveSheet.Shapes("Textfeld100").Te...
05.02.2022 10:19:22
Thread-ID: 1869009
4 Beiträge
Wort in Word-Textfeld mit Excel ändern
Dadsche
Hallo,
ich habe einen Musterbrief welcher aus drei Teilen mit entsprechendem Inhalt (Kundenadresse, Unternehmensadresse und Text) besteht.
In den einzelnen Teilen sind jeweils Musterwörter (z.B. KUNDENNAME) enthalten, die bei der Stapelverarbeitung entsprechend ersetzt werden.
Bisher ha...
17.03.2022 16:10:03
Thread-ID: 1875671
6 Beiträge
Zellfarbe verändern, wenn Filter aktiv ist (2)
Dieter Klein
Hi zusammen,

im Forum gibt es einen Beitrag mit "Zellfarbe verändern, wenn Filter aktiv ist" aber leider färbt er nur die Zeile ein, die ausgewählt ist.
Wie kann ich den Befehl abändern damit nur die Zelle in der 2. Zeile bei aktiviertem Autofilter eingefärbt wird?

Ich danke eu...
01.12.2023 14:00:10
Thread-ID: 1956157
7 Beiträge
Füllfarbe ändern wenn derselbe Text in Bereich steht
margl
Ich stehe bei folgendem Punkt an:

Im Tabellenblatt 1 in jeder Zeile der Spalte A steht ein Text (nie dergleiche) z.B.: 31.Mär.2023-30.Mai.2023 Kohlrabi Beetmeter: 1,25
Die Spalte A wird ca. 2000 Zeilen haben
Wenn im Tabellenblatt 2 in dem Zellbereich von C1 bis F2000 auch derselbe T...
10.12.2023 00:27:49
Thread-ID: 1957221
9 Beiträge
Anzeige
Wert nach Änderung einer Zelle schreiben
Markus

Hallo Leute,
ich werde Excel nie wirklich verstehen. Habe wieder eine Frage: Bei Veränderung des Wertes einer Zelle möchte ich einen Wert in eine andere Zelle schreiben (klingt einfach - gelingt mir nicht!):
Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo ErrorHandle...
01.10.2008 18:26:00
Thread-ID: 1013729
31 Beiträge
Userform Labeltext bei bestimmten Wert
Werner

Hallo zusammen!
Ich habe mir ein Userform mit einer Combobox erstellt.
Ich möchte, dass in diesem Userform eine Meldung (Label) erscheint, sobald ein bestimmter Wert aus der Combobox ausgewählt wird.
Geht so was? Wenn ja wie?
Gruß und Danke!
Werner
05.12.2008 09:49:00
Thread-ID: 1030371
3 Beiträge
in Tabellenblättern suchen und Schriftfarbe ändern
ad

Hallo zusammen,
ich möchte in mehreren Tabellenblättern (Liste ist im Blatt Namen c3:c.. aufgeführt) bestimmte Buchstaben suchen und per VBA-Makro Schriftfarbe ändern . Bedingte Formatierung ist schon ausgereizt.
Wer kann mir weiterhelfen?
Gruss ad
13.08.2009 22:11:33
Thread-ID: 1095796
11 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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