Datum

Titel

18.04.2024 19:30:20

VBA - Tabelle mit Mannschaftsergebnissen sortieren

18.04.2024 18:04:29

Formel fehler Wert#

18.04.2024 17:45:21

Shellkommando ausführen, stderr auslesen

18.04.2024 17:41:41

Summe: Bestimmter Bereich mit sverweis

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1348to1352

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

VBA - Wenn Zelle "x" enthält, dann andere Zelle fa

Forumthread: VBA - Wenn Zelle "x" enthält, dann andere Zelle fa
5 Beiträge zu diesem Forumthread
Anzeige
300 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Top 100 Forumthreads

13.02.2014 15:10:58

Matthias

Hallo liebe Excel Gemeinde,
habe folgendes Problem: In Spalte Y sind in bestimmten Zeilen ein "x" eingetragen. In Spalte AA sind Zellen farblich markiert. Ich möchte nun bei VBA überall dort wo in Spalte Y ein "x" enthalten ist, die farbliche Markierung in Spalte AA (selbe Zeile) aufheben bzw. keine Füllung.
Kann mir jemand dabei helfen?
Vielen Dank!
Gruß
Matthias

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 15:17:22

Hajo_Zi
AW: Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 15:26:37

Matthias
AW: Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 15:30:22

Matthias
AW: Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 15:50:54

Peter
AW: Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 16:08:09

Matthias

Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 15:17:22

Hajo_Zi

Hallo Matthias,
warum VBA. Benutze die bedingte Formatierung.

AW: Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 15:26:37

Matthias

Hallo Hajo,
war auch meine erste Idee aber leider funktioniert der "Anschlussweg" damit nicht, der wäre, dass sich auf Spalte AA ein PieChart die Farben zieht. Mein Code dafür erkennt leider nicht die bedingte Formatierung an sondern nimmt immer die Farbe, die vorher quasi drin war. Deswegen dieser Weg.

AW: Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 15:30:22

Matthias

Leider bekomme ich hier keine richtige Schleife drum gelegt

Sub Farbige()
Dim myseries
If Range("Y3") = "x" Then
Range("AA3").Select
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End If
End Sub

Man müsste das jetzt quasi für jede Zeile machen....NERV

AW: Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 15:50:54

Peter

Hallo Mattias
Probier mal:

Sub Farbe()
Dim e As Object
For Each e In Sheets("Tabelle1").Range("Y1:Y" & Cells(Rows.Count, 25).End(xlUp).Row)
If e.Value = "x" Then
With e.Offset(0, 2).Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End If
Next e
End Sub

Gruß
Peter

AW: Wenn Zelle "x" enthält, dann andere Zelle fa

13.02.2014 16:08:09

Matthias

Hallo Peter,
funktioniert PERFEKT!
Danke mein Frust hat ein Ende ;-)
Matthias