Farver i grafareal

Jeg har aldrig eksperimenteret med det, men her er måske en ide du kan arbejde videre med. Jeg bruger koden til at markere en felt i en rapport hvis det evt. skal fremhæves. Farveintensiteten justerer du ved at rette i tallene i parantesen. Jeg ved som sagt ikke om det virker i grafer, og da jeg er på vej ud af døren har jeg ikke tid til eksperimenter (og når nu ingen andre har meldt sig på banen):


Dim lngRed As Long, lngYellow As Long, lngBlack As Long, lngWhite As Long
lngRed = RGB(255, 0, 0)
lngYellow = RGB(255, 255, 0)
lngBlack = RGB(0, 0, 0)
lngWhite = RGB(255, 255, 255)
If Felt1 > 400 Then
Felt1.ForeColor = lngRed
Felt1.BackColor = lngWhite
Else
Felt1.ForeColor = lngBlack
Felt1.BackColor = lngWhite
End If

Hej Kim,

Du kan kun styre det vha kode (som i Mugs forslag)

Koden ser således ud og kan placeres på detaljesektionens Format-hændelse:

Private Sub Detaljesektion_Format(Cancel As Integer, FormatCount As Integer)
    Me![Graf].Object.ChartArea.Interior.Color = RGB(10, 100, 40)
end sub

Hvis det er en formular, kan du bare placere koden på Form_Load i stedet.

[Graf] angiver navnet på dit graf-objekt og skal selvfølgelig erstattes med sit eget.
Jeg går ud fra at du kender RGB(rød, grøn, blå)? Eller kan du også angive en absolut farvekode eller hvad du måtte have lyst til.

/Thomas

Hvis det er det forkerte areal, jeg har farvet, så må du lige vende tilbage. Jeg gik ud fra, at det var baggrundsfarven på selve grafen, du snakkede om?

Jo - det er selve grafarealets farve, jeg mener! Men jeg er ikke helt klar på hændelsen. Jeg har en form med en detailsektion, hvorpå jeg har placeret en graf. Hvad hedder stedet, hvor koden skal ind (evt. i engelske termer)?

Hej Kim,

Læg linien
Me![Graf].Object.ChartArea.Interior.Color = RGB(10, 100, 40)
i formens VedIndlæsning (Form_Load) hændelse.

/Thomas

Virkelig godt - det var lige det, jeg søgte! Men når man rækker Fanden en....: når man lægger farve på grafarealet, fremkommer der en (som start) smal hvid ramme omkring grafarealet, som tilsyneladende altid er der - kan man på tilsvarende vis farve denne?

Nej, jeg tror ikke at du kan ændre den del, hvis du ikke kan fange den manuelt...