Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 21:55:37
Preiserhöhung über mehrere Jahre berechnen
17.04.2024 20:19:32
Endzeitpunkt berechnen aus d:hh:mm errechnen
17.04.2024 18:57:33
Errinnerungsfunktion
17.04.2024 16:56:58
Stunden addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1220to1224
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
1220to1224
1220to1224
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bedingte Formatierung VBA

Bedingte Formatierung VBA
Phil
Hallo Liebe VBA Profis,
erst einmal danke für dieses tolle Forum, was mir schon bei vielen Problemen geholfen hat.
Dummerweise habe ich dieses mal keine Antwort auf mein Problem gefunden, deshalb schreibe ich nun und hoffe, dass mir jemand helfen kann:
Ohje wo soll ich anfagen..?
Ich möchte eine bedingte Formatierung in VBA erstellen. Jetzt gibt es bei der bedingten Formatierung aber zwei Sachen:
Die eingefügte Grafik sollte helfen.
Userbild
Bei Punkt 1 gebe ich da zweimal "=" ein. Das geht bei VBA nicht. Die Formel, wie sie aber da steht funktioniert. Nur habe ich 800 Boxen und in excel 2010 kann ich die Absoluten Bezüge nicht wegnehmen (nur bei bedingter Formatierung nicht)..
In VBA gebe ich ein:
Cells(i, n).FormatConditions.Add Type:=xlExpression, Formula1:="="&cells(i,n).address&"="&cells(i,n+1) bekomme ich eine Fehlermeldung wegen den zwei "=". Ich muss ihm aber irgendwie sagen, wenn in der Zelle xy steht und dies gleich xy ist, dann markiere die ganzen anderen Zellen (Punkt 2) rot etc. Ich weiß aber nicht, wie ich sowohl 2 mal "=" in einer Formel nehmen kann. Habt Ihr eine Idee..?
Tausend Dank
Phil

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Bedingte Formatierung VBA
30.06.2011 16:33:44
ChrisL
Hi Phil
Fehlt da nicht beim zweiten Cells() das ".address"
Ein Test mit dem Makrorekorder funktioniert trotz "="
Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=$B$1=$C$1"
cu
Chris
AW: Bedingte Formatierung VBA
30.06.2011 16:45:49
Phil
Das ist richtig, es funktioniert Formula1:="......" da habe ich aber das Problem, dass kein relativer Bezug vorhanden ist. Meine Formel müsste durch jede Zelle gehen, da den Wert reinschreiben, dann weiter gehen etc. Er soll in celle xy gehen und da sagen, wenn diese Zelle = einer anderen Zelle ist, dann färbe bitte den Zellenbereich xy (Punkt 2). Danach gehe weiter in Celle yz und färbe wieder etc.
Anzeige
auch mit ="=" gehts ...
30.06.2011 16:46:32
Matthias
Hallo
hier mal nur für F6 "aufgezeichnet & geringfügig verändert"
 With Range("F6")
.FormatConditions.Delete
.FormatConditions.Add Type:=xlExpression, Formula1:="=$F$6=$G$7"
.FormatConditions(.FormatConditions.Count).SetFirstPriority
With .FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 49407
.TintAndShade = 0
End With
.FormatConditions(1).StopIfTrue = False
End With

getestet allerdings nur unter XL2007
Userbild
Anzeige
AW: auch mit ="=" gehts ...
30.06.2011 16:54:48
Phil
Ich brauche leider wie gesagt irgendwie einen relativen Bezug....
Ich bin gerade am verzweifeln sorry..
AW: auch mit ="=" gehts ...
30.06.2011 17:02:33
Phil
Es geht... Danke euch! musste den Type ändern
Viele Grüße
Phil

305 Forumthreads zu ähnlichen Themen

bedingte formatierung berechnen lassen unter vba
morbiuz

Hallo,
ich habe eine Spalte A auf der 2 verschiedene bedingte Formatierungen gesetzt sind (rot, grün) für die Scriftfarbe
leider kann ich die Werte nicht über meine Funktion zusammenrechnen lassen:
Sub mtest() Dim zelle As Range Dim bereich As Range Dim a As Integer Set bereich =...
20.08.2008 03:03:00
Thread-ID: 1003056
2 Beiträge
Anzeige
Bedingte formatierung mit Wenn
kdl

Hallo, ich freue mich dieses Forum gefunden zu haben. An Hand eurer Beiträge konnte ich schon einiges dazulernen. In der letzten Zeit habe ich mich damit beschäftigt mit Excel zu zeichnen, über bedingte Formatierung (Rahmen zu weisen) erstelle ich die Draufsicht einer Arbeitsplatte.
Meine e...
12.09.2008 14:06:00
Thread-ID: 1009364
2 Beiträge
Bedingte Formatierung mit Bereich
Burghard

Hallo,
ich habe einen Fotokalender gebastelt (für jeden Monat ein Blatt).
Das Jahr läßt sich im 1. Tabellenblatt in Zelle A1 einstellen. Alle anderen Tabellenblätter ändern sich entsprechend.
In den Monaten habe ich verschiedene Bereiche mit einer bedingten Formatierung versehen, um...
05.10.2008 16:09:12
Thread-ID: 1014259
6 Beiträge
Anzeige
Zellen formatierung mit Formeln
Peter

Hallo
habe eine Formatierung in einer Zelle, in der er die 0 als 00 anzeigen soll.
Das macht er so lange ich keine Formel drin habe.
Sobald die Formel drin ist., zeigt er mir nur eine 0 (Null an.
die Formel ist
RECHTS(SUMMEWENN(C14:C40;">0";G14:G40);2)
Wie bekomme ic...
08.11.2008 18:25:00
Thread-ID: 1022970
7 Beiträge
Bedingte Formatierung oder VBA?
maruseru

Hallo werte Profis
Irgendwie raff ich es heute nicht
Habe eine Spalte mit Artikel Nummern. Jeweils das erste Zeichen ist = Produkte Typ.
A976164
A980602
B181645
B491942
F199587
F215047
F224410
G224410
F232634
Ich möchte nun anhand des ersten Zeich...
27.11.2008 14:09:45
Thread-ID: 1028367
7 Beiträge
VBA Bedingte Formatierung
Peter

Hallo,
möchte gern das Abhängig von A1 in der ein "w" oder ein "m" steht, das A2:Z22 alles entweder rosa (w)
oder hell bLau (m) ist.
Habt Ihr eine Idee?
Beim Druck soll nachher alles wieder schwarz weiß sein.
Gruß Peter
09.12.2008 22:32:36
Thread-ID: 1031538
20 Beiträge
Bedingten Formatierung mit MIN; gr. als Mittelwert
Eva

Hallo,
ich habe ein Problem mit einer Bedingten Formatierung.
Ich möchte mir in mehreren Zeilen die MIN Were grün anzeigen lassen und die Werte, welche größer oder gleich dem Durchschnitt sind rot. Leider haut es so gut wie nie in den Zeilen hin. Oft markiert er nur eine Zelle, die ande...
18.12.2008 16:01:00
Thread-ID: 1033913
7 Beiträge
Formatierung mit in die Formel einarbeiten
Jochen

Hallo,
habe folgende Formel:
=WENN(A8"";VERKETTEN(SVERWEIS(A8;B2:E5;2;FALSCH);ZEICHEN(10);SVERWEIS(A8;B2:E5;3;FALSCH);" / "; SVERWEIS(A8;B2:E5;4;FALSCH));"") .
Diese Formel verkettet "Name" - "Vorname" - "/" und eine weitere "Bezeichnung" miteinander.
Die Zelle ist Fett und Schr...
12.01.2009 10:57:00
Thread-ID: 1038800
4 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
5
1
5
7
6
6
19
6
3
8
5
2
2
7
3
4
1
3
7
4
6
2
7
7