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

Namen in Tabelle suchen und diesen in Cyan färben

Forumthread: Namen in Tabelle suchen und diesen in Cyan färben

Namen in Tabelle suchen und diesen in Cyan färben
23.09.2024 14:58:35
sigrid
Guten Tag zusammen,
ich habe mal wieder eine Frage.
In einem Tabellen Blatt "B10-K10" möchte ich nach Namen suchen und dieses Namen
einfärben.
Z.B. suche nach Philipp dann soll der Name bzw. Zelle in Cyan eingefärbt werden.

mfg siegrid
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Namen in Tabelle suchen und diesen in Cyan färben
23.09.2024 15:12:08
SF
Hola,
du markierst B10:K10.
Start - Bedingte Formatierung - Neue Regel - Formel zur Ermittlung.... 
=B10="phillip"
Sollte neben "phillip" noch etwas in der Zelle stehen: 
=SUCHEN("phillip";B10)
Gruß,
steve1da
AW: Namen in Tabelle suchen und diesen in Cyan färben
23.09.2024 15:20:25
daniel
Hi
als feste Formatierung mit diesem Code 

Sub test()

Dim Zelle As Range

With Range("B10:K10")

.Interior.Color = xlNone 'alle Zellen im Bereich auf Standardfarbe

For Each Zelle In Range("B10:K10")

    If Zelle.Text Like "Phillip" Then Zelle.Interior.Color = vbCyan

Next

End With

End Sub


Gruß Daniel
Anzeige
Super, kann man...
23.09.2024 15:39:38
sigrid
Hallo Daniel,
genau das !
Danke !
Kann man das bei mehreren Namen so einsetzen, funktioniert, aber
ist das Richtig ? 
Sub tests()

Dim Zelle As Range



 ActiveSheet.Unprotect (getStrPasswort)

With Range("D12:j43")

.Interior.Color = xlNone 'alle Zellen im Bereich auf Standardfarbe

For Each Zelle In Range("D12:j43")

    If Zelle.Text Like "Walter" Then Zelle.Interior.Color = &HFFFFC0

Next

For Each Zelle In Range("D12:j43")

    If Zelle.Text Like "Arno" Then Zelle.Interior.Color = 13434879

Next

End With


gr sigrid
Anzeige
Einwandfrei, habe gerade getestet !
23.09.2024 15:42:16
sigrid
Hallo, 
Sub testsww()

Dim Zelle As Range

With Range("D12:j43")

.Interior.Color = xlNone 'alle Zellen im Bereich auf Standardfarbe

For Each Zelle In Range("D12:j43")

    If Zelle.Text Like "Walter" Then Zelle.Interior.Color = &HFFFFC0

    If Zelle.Text Like "Arno" Then Zelle.Interior.Color = 13434879

Next

End With

End Sub


habe gerade getestet, klappt !

mfg sigrid

Anzeige
AW: Einwandfrei, habe gerade getestet !
23.09.2024 15:54:41
daniel
HI
kleine Optimierung, vermutlich gibt des noch mehr Namen und du willst dich sicherlich nicht mit den RGB-Farbwerten rumplagen.

1. Lege ein neues Tabellenblatt an (Tabelle2, kannst du natürlich nach belieben ändern)
2. schreibe in die Spalte A untereinander die Namen und färbe die Zelle mit jedem Namen in der gewünschten Farbe
3. schreibe den Code jetzt so 

Sub test()

Dim Zelle As Range

Dim Farbe as Range

With Range("D12:j43")

.Interior.Color = xlNone 'alle Zellen im Bereich auf Standardfarbe

For Each Zelle In Range("B10:K10")

    Set Farbe = Sheets("Tabelle2").Columns(1).Find(what:=Zelle.Value, lookat:=xlwhole)

    if Not Farbe is Nothing then Zelle.Interior.Color = Farbe.Interior.Color

Next

End With

End Sub


damit musst du den Code nicht ändern, wenn Namen, die gefärbt werden sollen sich ändern, oder die Farbe, weil die Information, welche Farbe zu welchem Namen gehört, jetzt in der Tabelle2 hinterlegt ist und nicht mehr im Code.

Gruß Daniel
Anzeige
Guten Morgen Daniel, eine toller Tipp ! -)
24.09.2024 10:48:28
sigrid
läuft einwandfrei -)
23.09.2024 17:48:55
sigrid
AW: Namen in Tabelle suchen und diesen in Cyan färben
23.09.2024 15:14:26
sigrid
Hallo steve1da,
das geht leider nicht mit bedingter Formatierung, es sollte leider mit
einem Makro sein.
Ab und zu werden die Farben gelöscht und ich muss diese dann mit einem Makro
neu reinsetzen.

mfg siegrid
Anzeige

Forumthreads zu verwandten Themen

Wert in Tabelle suchen und summieren.
cfrei75

Hallo ich habe ein Problem! Wer kann mir bitte helfen.
Beispiel:
A1=6 Uhr
B1=21 Uhr
In der Zeile 2 stehen die Uhrzeiten von 0 bis 24 Uhr (24 Werte) als Titel.
In der Zeile 3 stehen die Werte der einzelnen Uhrzeiten (24 Werte).
Ich bräuchte die Summe der Uhrzeitwerte zwis...
20.10.2008 18:14:00
Thread-ID: 1017780
5 Beiträge
Spalte durchsuchen und Werte ausgeben
Sebi

Moin moin zusammen,
ich habe folgendes Problem: Ich habe in einer Spalte mehrere gleiche bzw. verschiedene Werte stehen (siehe Beispiel unten). Ich möchte nun diese Spalte durchsuchen und mir alle verschiedenen Werte in einer seperaten tabelle ausgeben lassen. Ich habe das ganze versucht mi...
05.11.2008 11:27:54
Thread-ID: 1021806
4 Beiträge
Suchen in Matrix nach 2 Werten mit einer Funktion
Heix

Hallo zusammen, habe gerade die Gesamt-CD von Herrn Herber erhalten und habe nun auch schon die erste Frage:
Ich möchte in einer Zelle den Wert aus einer Matrix übernehmen lassen und zwar wie folgt:
Matrix:
Lampe Brutto Netto
-------- -------- -------
EGES.....24.......18
28.11.2008 11:24:00
Thread-ID: 1028631
5 Beiträge
Tabelle nach Namen durchsuchen -> Wert ausgeben
Aschi

Hallo,
ist es möglich mit einer Excel Funktion eine Tabelle nach gewissen Informationen zu durchlaufen und in einer anderen Zelle dann einen entsprechenden Wert auszugeben?
Also z.B. ich habe eine Liste und in der Zelle E steht „1. FC Köln“, eine Zeile darunter steht in E „FC Bayern Mün...
02.12.2008 16:17:12
Thread-ID: 1029551
8 Beiträge
Anzeige
Zelle suchen und ausgeben per VBA
Lutz

Hallo,
ich habe eine Mehrdfachoperation, bei der ich mehrere Parameter gegeneinander auswerte. Dabei benutze ich immer eine %-Änderung der Parameter. Ich würde gerne neben den Ergebnissen der Mehrfachoperation aber auch die absoluten Werte der Parameter ausgeben. Da ich mehr als 7 Parameter...
10.02.2009 20:42:00
Thread-ID: 1049308
8 Beiträge
listbox werte in tabelle suchen
kirsche

hallo leute,
und wieder komme ich nicht weiter und brauche eure hilfe.
ich befülle eine listbox mit den daten aus einer hilfstabelle. nun werden über multiselect werte ausgewählt. über commandbutton1 schreibe ich diese werte in einen 2. tabelle, welche übersicht heißt. das funktioniert...
16.02.2009 12:03:00
Thread-ID: 1051097
3 Beiträge
In Spalte nach Wert suchen VBA
andreas


Hallo zusammen,
ich habe hier eine Tabelle, da will ich nach jeder Änderung in der Tabelle in Spalte "F" nach Wert "Spritzgießen" suchen und bei den gefundenen Zeilen die Zellen "B-N" rot einfärben und mit Rahmen versehen.
Komme aber wegen Mangels VBA-Erfahrung nicht klar damit.
03.04.2009 13:05:41
Thread-ID: 1066652
5 Beiträge
Wert in mehren Tabellen suchen
Herbert

Guten Morgen!
Ich habe eine Excelmappe "A" mit mehreren Tabellen und eine Excelmappe "B" mit einer Tabelle. Excel soll nun den Wert der Spalte "A" der Excelmappe "B" in den Tabellen der Mappe "A" suchen und, wenn gefunden, den Wert der Spalte "D" in die Spalte "C" der Tabelle der Mappe "B"...
29.04.2009 11:34:01
Thread-ID: 1071841
6 Beiträge
Anzeige
Spalte nach Wert >10 durchsuchen und Wert ausgeben
Ron

Hallo Leute,
ich benötige wieder mal Hilfe bei der Umsetzung einer Idee. Ich habe in einem Tabellenblatt in einer Spalte (A) 20 absteigende Werte in Prozent. In Spalte B habe ich in ganzen Zahlen die Treffer aus meiner Datenbank zugeordnet. Jetzt möchte ich Spalte B von oben nach dem ersten...
05.05.2009 14:44:46
Thread-ID: 1073093
9 Beiträge
Anzeige
Werte suchen und anderen Spaltenwert zurück geben
Andre

Hallo alle zusammen,
habe ein Makro, dass in Datei_1 Spalte A Zeile für Zeile eine Übereinstimmung in einer
Datei_2 https://www.herber.de/bbs/user/62397.xls
in Spalte B sucht und wenn eine Übereinstimmung gefunden wurde, dann wird der Zellwert aus Datei 2 https://www.herber.de/bbs/u...
12.06.2009 20:51:05
Thread-ID: 1081180
6 Beiträge
In Tabelle Suchen und Bereich kopieren - Bitte Hil
Marc

Hallo,
auch nach ausgiebiger Suche habe ich leider keine Lösung zu meinem Problem gefunden.
Ich möchte aus einem anderen Workbook nach einem bestimmten Text suchen, dies mache ich bislang wie folgt
Dim Zelle as Range
Dim customers as Range
Set customers = Workbooks("Cus...
25.06.2009 20:52:35
Thread-ID: 1084450
4 Beiträge
Zellenwerte in zweiten Tabelle suchen
Bea

Hi Fachleute,
ich möchte die Werte einer Spalte C Tabelle A in einer Spalte A der Tabelle B suchen, wenn gleich dann Spalte D Tab.A "WAHR" sonst "NEIN". Ausschließlich Zahlen. Tab. A und B unterschiedlich lang. Werte in Tab.B kommen mehrmals in der Spalte A vor.
Danke!!!!
29.07.2009 18:14:44
Thread-ID: 1092337
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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