Office: (Office 2010) im Bericht Hintergrundfarbe eines Textfeldes ändern

Hallo Forum,

Meine Frage an Euch ist leider nicht so trivial wie es der Titel glauben macht.
Und gleich vorweg: es geht nicht um "bedingte Formatierung".

Also, folgende Problemstellung (natürlich äußerst vereinfacht):

Mein Bericht enthält im "Detailbereich" mehrere Felder. Von einem dieser Felder, nennen wir es Feld_A möchte ich den Hintergrund "dynamisch" einfärben. Und zwar abhängig vom Wert zweier anderer Felder aus dem "aktuellen" Datensatz. Diese beiden anderen Felder werden im Bericht aber nicht angezeigt, sind also keinem Textfeld zugeordnet.

Ich suche jetzt schon geraume Zeit im Netz aber werde nicht wirklich schlau.

Ich vermute, ich muss dazu eine kleine Funktion programmieren die den Hintergrund setzt. Vermutlich in die Richtung [Feld_A].Backcolor = RGB(blah,bla,bla). Aber ich habe keine Vorstellung wo ich diese Funktion aufrufe (in welchem "Ereignis"). Oder auch wie ich in dieser Funktion auf die Felder des aktuellen Datensatzes zugreifen könnte.

Kann mir da vielleicht jemand von Euch ein paar zündende Ideen liefern??

Grüße
Norbert

:)

 

Ausfuehren laesst sich sowas hoechstens "Beim Formatieren" des Berichtes.
Und die Daten fuer die Bedingungen sollten schon im Bericht enthalten sein - wenn auch in versteckten und nicht zu druckenden Feldern....

 

Hallo!

Du könntest für die "nicht gezeigten" Datenfelder jeweils ein Steuerelement auf dem Bericht einfügen. Diese kannst Du später, wenn alles funktioniert, unsichtbar (Visible = False) machen.

Den notwendignen Code fügst Du in das Ereignis Beim Formatieren des Detailbereichs ein:
Code:

HTH

 

Was spricht dagegen?

Eine kleine Beispiel-DB (möglichst A2003) sollte weiter helfen.

 

Hallo Maxel,

naja, bei der bedingten Formatierung kann ich ja nur eine vordefinierte Farbe verwenden, oder?
Aber bei meiner Aufgabe wird die Farbe aus den Werten zweier Felder "berechnet"...

Grüße
Norbert

 

Hallo Thomas,

das klingt schon mal sehr nach dem wonach ich gesucht habe.

Du schreibst, ich hänge den Code an das Ereignis "Beim Formatieren".
Ich nehme an, gemeint ist das Ereignis "Beim Formatieren" des Detailbereichs, oder?

Werde es gleich probieren und meine Erfolge berichten.

Grüße,
Norbert

 

Hmmm. Vorerst noch kein Durchbruch.

Habe fürs erst mal folgenden Code eingefügt:
Code:

Leider bleibt das Feld "ResTblList_Txt" trotzdem weiß.

Interessant ist auch:

Der Bericht gibt 12 Zeilen im Detailbereich aus.
Meine Funktion Detailbereich_Format wird aber 23 oder 24 Mal aufgerufen. (bin beim Mitzählen meiner "Hallos" nicht ganz sicher).

Wird sie für jede Zeile 2x aufgerufen???

Grüße,
Norbert

 

Hallo,
verwende die bedingte Formatierung, das geht auch mit Bedingungen aus mehreren Feldern.

Wenn Du das Formatereignis verwendest, musst Du auch den Else Zweig der Bedingung programmieren, sonnst bleibt die Farbeer letzte Änderung.

Aber wie gesagt, das geht auch mit der bedingten Formatierung.

Definiere mal Deine Bedingungen zur Farbänderung.

 

Hallo gpswanderer,

"Bedingung" im eigentlichen Sinn gibt es kein. Die Hintergrundfarbe soll immer gesetzt werden. Der Wert der Farbe soll berechnet werden.

Ungefähr so (vereinfacht):

Backcolor = RGB(0,0,Feld_B*(1-Feld_C)*255)

Grüße,
Norbert

 

Also ich habe bei mir in einem Bericht mal folgenden Code getestet:
Code:

Funktioniert wunderbar und der Hintergrund des Textfeldes wird dunkelblau oder so.

Hast du beim Textfeld vielleicht "Hintergrundart" auf "Transparent" stehen?
Dann bleibt der Hintergrund weiß, weil er ja transparent ist.


Das Ereignis "Beim Formatieren" wird 2mal durchlaufen. Das habe ich schon lange irgendwo mal gelesen. Ich kann dir leider nicht mehr sagen, warum das so ist...

 

Das wars! Hintergrundart war Transparent.
Funktioniert schon. Feld ist schon bunt *Smilie

Jetzt muss ich nur mehr den Farbwert korrekt berechnen und das wird noch ein schönes Stück Arbeit. Die Daten für die zwei "unsichtbaren Hilfsfelder" zu bekommen wird noch eine echte SQL Herausforderung ...

Danke an Alle !!

 

Hallo!

wie schon geschrieben: Füge für diese Datenfelder Steuerelemente auf dem Bericht ein. Wenn am Ende alles funktioniert setzt Du deren Eigenschaft Sichtbar auf Nein.

CU

 

Hallo
dazu:

möglich das Dir meine Muster MDB dabei Helfen kann *wink.gif*
hier:
https://dl.dropbox.com/u/46590638/AC...auswahlNEU.zip
runterladen und öffne Formular FrmFarbauswahlMitGrundpalette
danach wähle die Farbe mit dem Button ...
Jetzt siehst Du die Farbwerte als Long/RGB/ HEX

oder klicke auf den Botton unten Links für den Bericht mit verschiedenen Farben *Smilie

 

Hallo Thomas

Ja, Ja. Das ist völlig sonnenklar! Das Schwierige wird jetzt, die Daten für diese 2 Felder zu bekommen. Es sieht ungefähr so aus:

Der sehr sehr komplexe Query, der jetzt den Bericht füttert liefert (unter anderem):


Datum Zeit Name Nummer Feld5 Feld6 ...
15.7.12 14:00 Maier 1 A B
15.7.12 14:15 Müller 2 C D
15.7.12 15:00 Huber 3 E F
15.7.12 16:00 xxx ....
15.7.12 16:30 yyy ....
15.7.12 17:00 zzz ....
usw...
usw...


Die Tabelle, die mir die 2 Werte für diese 2 Felder Liefert sieht so aus:


Datum Stunde Wert1 Wert2
15.7.12 14:00 46 13
15.7.12 15:00 22 80
15.7.12 16:00 35 0
15.7.12 17:00 0 0
15.7.12 18:00 17 75
usw ...
usw ...


Das bedeutet, ich muss jetzt die 2. Tabelle zum bestehenden Query joinen wobei ich nicht weiß ob access eine join-bedingung wie

ON Tab1.Datum==Tab2.Datum AND HOUR(Tab1.Zeit)==Tab2.Stunde

verdaut .. Muss ich ausprobieren..