Kirsten1712
Gebruiker
- Lid geworden
- 11 jan 2017
- Berichten
- 28
Hallo
Ik kom er bij deze niet uit en weet dat ik altijd op jullie advies kan rekenen dus .. help!
In een Excel worden er waardes gescand in kolom A. Zodra er in kolom A iets beweegt, worden ook de kolommen B tem G berekend.
Daarna zou ik graag willen dat die lijn ("A:G") een kleur krijgt adhv een formule. Manueel instellen lukt prima, via VBA niet zo prima..
Hier alvast tot waar het wel lukt en wat mij fout lijkt te lopen.
De formule baseert zich steeds weer op de waarde in de 2de rij, terwijl deze voor elke nieuwe rij, zich ook op die nieuwe rij zou moeten baseren.
Alvast bedankt!!
Ik kom er bij deze niet uit en weet dat ik altijd op jullie advies kan rekenen dus .. help!
In een Excel worden er waardes gescand in kolom A. Zodra er in kolom A iets beweegt, worden ook de kolommen B tem G berekend.
Daarna zou ik graag willen dat die lijn ("A:G") een kleur krijgt adhv een formule. Manueel instellen lukt prima, via VBA niet zo prima..
Hier alvast tot waar het wel lukt en wat mij fout lijkt te lopen.
Code:
Sub redlines()
Range(Cells(Selection.Row, 1), Cells(Selection.Row, 7)).Select
'Ik heb geprobeerd om de formule op verschillende manieren te formuleren ($), maar dat lijkt niet de juiste oplossing te zijn.
Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=AND($A2<>"""";$E2=0)"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 255
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False
End Sub
Sub orangelines()
Range(Cells(Selection.Row, 1), Cells(Selection.Row, 7)).Select
Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=AND($A2<>"""";$E2<$D2)"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 49407
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False
End Sub
De formule baseert zich steeds weer op de waarde in de 2de rij, terwijl deze voor elke nieuwe rij, zich ook op die nieuwe rij zou moeten baseren.
Alvast bedankt!!