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
1616to1620
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
1616to1620
1616to1620
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA- Dubletten von aktiver Zelle färben

VBA- Dubletten von aktiver Zelle färben
05.04.2018 13:16:23
aktiver
Hi,
umso mehr ich an meiner Tabelle arbeite desto mehr brauche ich eure Hilfe >- Ich habe eine Spalte (B) in dieser stehen viele Kombinationen aus Buchstaben und Zahlen. (B13:B200)
Ich würde gerne wissen wie man einen VBA Code schreibt der mir sobald man eine Zelle dieser Spalte anklickt, alle anderen Zellen in denen die selbe Kombination steht farblich hervorhebt. (Am besten gelbe Füllfarbe) Es geht nur um Spalte B in allen anderen Spalten soll nichts passieren.
Und die Farbe soll natürlich auch wieder weg wenn die Zelle nichtmehr aktiv ist.
Geht soetwas überhaupt ?
LG Dimi

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

Betreff
Datum
Anwender
Anzeige
ohne VBA; mit bedingter Formatierung
05.04.2018 13:26:45
UweD
Hallo
&LT alle anderen Zellen in denen die selbe Kombination
welche Zelle der angeklickten Zeile sollen denn verglichen werden?
LG UweD
AW: ohne VBA; mit bedingter Formatierung
05.04.2018 13:34:21
Dimi
Hi UweD
Die angeklickte Zelle soll mit allen Zellen in B13:B200 verglichen werden.
Die angeklickte Zelle befindet sich aber selbst innerhalb B13:B200
Und es wäre super wenn die angeklickte sich ebenfalls mitfärbt. Aber das ist nicht wichtig falls es das ganze verkomplizieren würde.
AW: Bedingte Formatierung
05.04.2018 13:38:22
Dimi
Mit bedingter Formatierung kann ich immer nur alle gleichzeitig und permanent markieren.
Da ich nicht Sortieren kann und es viele verschiedene doppelte sind brauche ich eine Möglichkeit mir immer nur eine Kombination anzeigen zu lassen.
Anzeige
AW: Bedingte Formatierung
05.04.2018 13:46:52
Werner
Hallo Dimi,
Code gehört in Codemodul des Arbeitsblattes auf dem er sich auswirken soll.
Rechtsklick auf den Tabellenblattreiter - Code anzeigen - Code rechts ins Codefenster kopieren
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim raZelle As Range, raBereich As Range
Set raBereich = Range("B13:B200")
If Target.Count > 1 Then Exit Sub
If Target.Column = 2 Then
For Each raZelle In raBereich
If Target  "" Then
If raZelle.Value = Target.Value Then
raZelle.Interior.Color = vbYellow
Else
raZelle.Interior.Color = vbWhite
End If
End If
Next raZelle
Else
raBereich.Interior.Color = vbWhite
End If
End Sub

Gruß Werner
Anzeige
AW: Bedingte Formatierung
05.04.2018 14:03:49
Dimi
Danke Werner,
das funktioniert super.
Jetzt kann ich weiter tüfteln :)
Gerne u. Danke für die Rückmeldung. o.w.T.
05.04.2018 14:08:58
Werner
AW: Bedingte Formatierung
05.04.2018 16:03:55
SF
Hola,
ist damit dein anderes Problem auch gelöst?
Gruß,
steve1da
AW: Bedingte Formatierung
05.04.2018 14:02:21
UweD
ok,
dann doch per VBA

323 Forumthreads zu ähnlichen Themen

VBA Zelle einfärben
Tom

Hi Leute,
ich weis zwar wie man ne Zelle einfärbt leider nicht beim objektorientierter Schreibweise kann mir da vll. jemand weiterhelfen?
Es soll einfach die Zeile Grün werden die Kopiert wurde, bzw. die Zelle. Private Sub CSearch_Click() Dim Dat1, Dat2, TB1_Comp, TB2_Comp, TB1_Paste, T...
03.08.2009 08:38:53
Thread-ID: 1093112
2 Beiträge
Anzeige
Excel Farbe der selektierten Zellen ändern
lupo

Guten Morgen,
ein Arbeitskollege möchte gerne die Farbe der ausgewählten / markierten Zellen ändern.
Zu dem Thema habe ich viel gegoogelt. An verschiedenen Stellen wird behauptet das würde nicht gehen.
Dann habe ich diese Video gefunden:
http://www.bukisa.com/videos/22842_mrexce...
07.08.2009 10:05:24
Thread-ID: 1094211
4 Beiträge
Zellenhintergrundfarbe per Auswahl ändern ?
Werner

Hallo,
ich möchte folgendes erreichen:
In der Zelle A1 soll zukünftig der Text stehen "Bitte Thema auswählen", sobald man auf diese Zelle klickt soll so ein kleines Auswahlmenü aufgehen in dem nun folgnde Auswahl erscheint:
1.: QUALITÄT - gelb - Wird dieser Eintrag ausgewählt so sol...
26.02.2010 12:31:53
Thread-ID: 1141730
5 Beiträge
Anzeige
Farbe von Schalter nach Zelleninhalt ändern
Schalter

Servus
ich wollte gern, das meine Schalter farbig hinterlegt wird, je nach Inhalt einer Zelle...
also wenn in Zelle A1 "1" steht soll mein Schalter rot sein, wenn "2" steht soll er grün sein...
geht das?
Danke
Timonski
09.06.2010 08:09:55
Thread-ID: 1160947
16 Beiträge
Zelle farbig ausfüllen über Formel / bedingte Form
Jim

Hallo Forum,
ich habe eien Frage bzgl. einer Zellformatierung.
Mit welcher Formel oder bedingten Formatierung kann ich einer Zelle eine Füllfarbe unter Randbedingungen zuweisen
Z.B steht in der Zelle A1 die Zahl 1, 2, 3, 4 oder 5. Nun soll die Zelle A2 farbig sein (ohne das ich ein...
22.07.2010 22:07:47
Thread-ID: 1168460
3 Beiträge
Zellenfarbe ändern
Kurt

Guten Abend,
ich möchte nur die Zellenfarbe der Spalte B nach Eingabe einer Zahl
ändern und zwar in Rot.
Die Farbe ist vorher Blau.
mfg Kurt B
14.09.2010 22:19:53
Thread-ID: 1177597
6 Beiträge
VBA Zellen je nach Inhalt einfärben
jens

Hallo Excel-Profis,
ich habe ein Makro das mir einen Bereich durchgeht und die Zellen je nach inhalt färbt:
Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) Sheets("Reservierung (3)").Select Dim RaBereich As Range, RaZelle As Range Set RaBereich = Range("B8:P48") 'Set RaBereic...
28.10.2010 12:00:06
Thread-ID: 1184257
7 Beiträge
Formatieren von Zellen per VBA
Zellen

Guten Tag
habe bereits eine Ergänzungsfrage zu einem Projekt bei welchem mir hier via Forum schon sehr sehr gut geholfen wurde....
und zwar:
mittels folgendem Code schreibe ich in eine Spalte ein Datum:
Cells(j, 10).Value = CDate(MyDatStrg)
Wie müsste ich diese Zeile erweite...
07.12.2010 10:53:17
Thread-ID: 1190357
18 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
3
3
4
2
15
2
5
6
17
4
14
7
2
3
11
5
2
2
2
3
3
2
6
6