Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1148to1152
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
1148to1152
1148to1152
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bedingte Formatierung Zustand per VBA abfragen

Bedingte Formatierung Zustand per VBA abfragen
Lutz
Hallo,
wie kann ich per VBA die Bedingte Formatierung (Formel) einer Zelle abfragen,
ob diese wahr oder falsch ausgibt?
Komme auch beim Durchstöbern anderer Beiträge zu diesem Thema nicht weiter!!!
M.f.G.
Lutz
AW: Bedingte Formatierung Zustand per VBA abfragen
03.04.2010 21:55:30
JoWE
Hallo Lutz,
dieses Makro setzt eine bedingte Formatierung im Bereich B1:D10.
Wenn ein Wert größer ist als der Wert in A1 wird die Formatierung aktiviert: 
Sub jupp()
With Worksheets(1).Range("B1:D10").FormatConditions _
.Add(xlCellValue, xlGreater, "=$a$1")
With .Borders
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = 3
End With
With .Font
.Bold = True
.ColorIndex = 4
End With
End With
End Sub

mit 'jn = worksheets(1).Range("B1").formatconditions(1).Font.Bold'
wird 'jn' true wenn in B1 eine bedingte Formatierung gesetzt ist.
Jochen
Anzeige
AW: Bedingte Formatierung Zustand per VBA abfragen
03.04.2010 22:14:12
Lutz
Hallo JoWe,
danke für Deinen Tipp, ich habe meine Frage warscheinlich etwas zu knapp verfasst.
Mein Ansinnen war: wenn ich in einer Zelle oder einem Zellbereich Bedingte Formatierungen (Formeln) hinterlegt habe und diese bei "wahr" mir die entsprechende Zelle einfärben, möchte ich abfragen ob die Formel wahr oder falsch ergibt oder die derzeitig angezeigte Farbe ermitteln.
Ich möchte danach die Bedingte Formatierung löschen und die Zelle einfärben.
M.f.G.
Lutz
Du hast dich schon klar ausgedrückt,...
04.04.2010 01:30:50
Luc:-?
…Lutz,
bis auf das Ermitteln der aktuellen Zellfarbe, nur Jochen hat wohl das (eigentl) Problem nicht erkannt… ;-)
Natürl kann es sein, dass du im Archiv (Button Alle Recherchen benutzen!) nichts gefunden hast, nichtsdestotrotz ist aber so manches vorhanden, sogar schon von diesem Jahr, u.a. auch von mir!
Nun kommt es ganz darauf an, wie kompliziert deine BedingtFormatFmln sind. Enthalten die auch relative Adressen, verwendest du ein nicht-englisches XL, wird außerdem noch spezielle wertabhängige Farbformatierung in der Zelle eingesetzt oder mehrfarbiger Text verwendet u.a. wird's kompliziert, denn du musst die Bedingungen auswerten, sonst bekommst du nie die aktZellfarbe raus. Es ist natürlich einfacher, wenn du nicht die Bedingungen ausliest, sondern sie nachstellst, was gewöhnlich hierzu empfohlen wird (auch von PC-Magazinen). Da du das ja nur einmalig machen willst, würde ich das empfehlen. Also eine Liste mit allen Bedingungs­Fmln (manuell) im TabBlatt anlegen und wie eine normale Fml auswerten.
Das lässt sich zwar auch vollautomatisch lösen, ist aber so zieml das Komplizierteste, was mit VBA gerade noch möglich ist, also nur was für rechte VBA-Freaks…*
*Meine udFkt dafür hat mehr als 1000 PgmZeilen und benutzt noch etliche Subfktt, die auch jeweils mind 100 PgmZeilen haben. Das Pgm, das Hajo stets anbietet (falls du darauf stoßen solltest), ist 1. nicht von ihm und 2. nur die halbe Miete…
Gruß+FrOstern, Luc :-?
Anzeige
AW: Bedingte Formatierung Zustand per VBA abfragen
04.04.2010 17:38:51
Lutz
Hallo Luc:-?, hallo Hajo,
danke für Eure Hilfe.
Hatte gedacht, dass man den aktuellen Zustand der Zelle leichter ermitteln kann.
Habe die Beispielarbeitsmappe mal getestet, müsste bei meiner Aufgabenstellung funktionieren.
Falls nicht's unerwartetes auftritt (:-)
Vielleicht gibt es in Zukunft (wie jetzt z.B. Filtern nach Farben) auch hier eine einfachere Lösung.
M.f.G.
Lutz
Anzeige
AW: Bedingte Formatierung Zustand per VBA abfragen
04.04.2010 17:40:33
Hajo_Zi
Hallo Lutz,
bis einschl. 2010 noch nicht. Es sei Du hast feste Bedingungen.
Gruß Hajo

313 Forumthreads zu ähnlichen Themen

VBA - If Anweisung mehrerer Abfragen
Jana

Hallo liebes Forum!!
Ich stehe gerade komplett (mal wieder auf dem Schlauch)!..
Ich habe einen umfangreichen VBA-Code mit Arrays. Nun möchte ich, dass in der Spalte 3 geguckt wird, ob die Zahl 2,3,7,9,11 oder 13 in dieser Zelle steht. Ist einer dieser Zahlen vorhanden, dann soll eine Va...
11.09.2008 12:06:28
Thread-ID: 1009072
3 Beiträge
Anzeige
Schleife: Zählen mit 2 Bedingungen
Sabrina

Hallo liebe Excel - Freunde,
Wollte erstmal sagen, dass ich das Forum ganz toll finde. Hat mir als Einsteiger schon den ein oder anderen Tipp gegeben.
Nun habe ich ein spezifisches Problem, bei dem ich einfach nicht weiterkomme. Ich hoffe ihr könnte mir dabei ein bisschen helfen.
Ic...
23.11.2008 20:21:00
Thread-ID: 1027155
6 Beiträge
ein Format in Zahl umwandeln VBA
Michael

Hallo!
Welche Möglichkeit gibt es über VBA eine Tabelle die ich zugesendet bekomme. Die Werte in Zahlen umzuwandeln. Beispiel
number name___ old__ new Change Change %
500041 system 23.26 23.28 -0.71 -2.45% #WERT!
540014 cpu 69.95 69.99 -0.22 -0.31% #WERT! =F...
29.01.2009 10:37:00
Thread-ID: 1044870
7 Beiträge
Anzeige
VBA: Sub in anderem Workbook aufrufen
Peter/Berlin

Hi VBA-Könner/Kenner,
vielleicht bekomme ich bei Euch die nötige Anregung zu folg. Problem:
Im Arbeitsspeicher geöffnet sind die Workbooks "A" und "B".
Von "A" aus soll eine Sub xyz in "B" aufgerufen werden (Call xyz).
Es erscheint der Fehler: Sub nicht definiert oder ähnlich...
02.04.2009 13:20:17
Thread-ID: 1066313
2 Beiträge
Schriftart einer Email aus Excel mit VBA änder
Helmut

Hallo,
ich generiere aus Excel eine Email und möchte in dieser generierten Email die Schriftart im Body verändern.
Kann mir jemand helfen?
Danke
Helmut
11.05.2009 15:01:05
Thread-ID: 1074366
2 Beiträge
VBA Code if or then nicht richtig
andreas

Hallo zusammen,
habe hier in einer Anwendung einen kleine Code bei dem wird der Systembenutzer abgefragt, das funktioniert. Jetzt soll folgendes passieren, wenn der Benutzer "Andreas" oder "martin2" ist, soll Spalte "f:G" eingeblendet sein, bei allen anderen Systembenutzern soll Spalte "F:G...
13.05.2009 11:25:25
Thread-ID: 1074763
9 Beiträge
Schleife von Basic in VBA umschreiben
Basic

Hallo Excel-Freunde,
da ich kein VBA-Basic schreiben kann, würde ich gerne eure Hilfe beanspruchen.
Die vorliegende Basic For Next Schleife läuft mit den angegebnen Variablen und Parameter,
würde sie gerne in VBA_Code mit einem Makro jedesmal starten.
A = 11 : B = 12
For I =...
18.07.2009 17:17:03
Thread-ID: 1089659
9 Beiträge
if ... then.. AND?
Sascha

einen schönen guten tag an alle,...
wie kann ich nach Then, vba 2 "Dinge" tun lassen ....(was für ein deutsch)... :)
If Sheets("Prüfen").Range("E10") = "Nein" Then
intAntb = MsgBox(Prompt:="Nicht vollständig, WEITER?", Buttons:=vbYesNo)
if intAntb = vbNo Then Exit Sub And? Userf...
29.09.2009 15:29:34
Thread-ID: 1106213
5 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
2
3
5
6
3
1
1
8
8
4
4
5
6
11
5
7
6
3
4
2
2
8
5
13
2