Onko mahdollista tehdä makroa joka värjää tietyt pylväät kaaviosta tietyillä väreille, eli jos pylväät nimi tieto on matti niin se värjäytyy sinisellä?
Makrolla pylväiden värjäys
Pylväsmatti
378
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 3
Vanhimmat
Sub Mattienväritys()
ActiveSheet.ChartObjects("Chart 1").Activate
With ActiveChart.SeriesCollection(1)
x = .XValues
i = 0
For i = LBound(x) To UBound(x)
If x(i) = "Matti" Then
.Points(i).Interior.Color = RGB(0, 0, 255)
End If
Next i
End With
End Sub
Entä jos pylväät nimi on Matti Meikäläinen niin miten saan sen värjäämään kaikki Matti alkuset sanat?
. . .
If Left(x(i), 5) = "Matti" Then
. . .