Zeile ändern Zeilenfarbe, wenn die Zelle in Raw einen eindeutigen Wert hat

Ich habe einen Code zum Ändern der Zeilenfarbe, wenn die Zelle in der Zeile einen speziellen Wert hat. Aber jetzt muss ich die Zeilenfarbe ändern, wenn die letzten zwei Buchstaben des Zellenwerts 'AP' sind. Wenn beispielsweise eine Zelle in Spalte A den Wert Orange11AP hat, sollte die Zeilenfarbe in Rot geändert werden. Ich bin irgendwie mit dem Zellenwert fest, wie es eine Mischung aus Buchstaben und Ziffern ist. Kann mir hier jemand helfen?Zeile ändern Zeilenfarbe, wenn die Zelle in Raw einen eindeutigen Wert hat

Quelle

2016-07-03 Dev

Bitte teilen, was haben Sie bereits und auch einige Beispieldaten. –

Unter der Annahme, cell als die Range Variable in einer Schleife die aktuelle Zelle zu halten, können Sie verwenden möchten:

If Right(cell,2) = "AP" Then cell.EntireRow.Interior.Color = vbRed

Quelle

2016-07-03 09:39:39 user3598756

Sorry Leute, ich verstehe dich nicht ganz. Mein aktueller Code wird die Schriftfarbe von Zelle D ändern, wenn in Zelle P irgendein Plank-Wert vorhanden ist. Aber jetzt wurde meine Anforderung geändert, wenn am Ende des Wertes von Zelle P ein "AP" steht, dann die gesamte Zeile (von A bis Q) sollte zu rot wechseln. Folgende ist mein aktueller Code – Dev

count2 = Range ("F: F"). Special (xlLastCell) .Row
Für n = 2 bis count2
Wenn Range ("P" & n) .Value = vbNullString Dann
Bereich ("D" & n) .Font.Bold = True
Bereich ("D" & n) .Font.Color = RGB (0, 0, 255)
– Dev

Machen Sie es Groß- und Kleinschreibung nur auf der sicheren Seite zu sein.

Wenn LCase (Right (ActiveCell.Value, 2)) = LCase ("AP") Dann Activecell.EntireRow.Interior.Color = vbRed

Quelle

2016-07-03 12:25:26 user85489

Zeile ändern Zeilenfarbe, wenn die Zelle in Raw einen eindeutigen Wert hat

Antwort

Verwandte Themen