rij kleuren als som = 0
Jaylee
Als in kolom K de waarde groter is dan 0 dan de rij
interior.colorindex=6
Als de rij gekleurd is, maar de waarde in rij K is weer 0 dan moet de
rij weer gewoon blanco worden.
Bedankt
Jaylee
Luc Heyndrickx
Waarom moeilijk doen als het makkelijk ook gaat ?
Luc
"Jaylee" <jayl...@yahoo.com> schreef in bericht
news:3d3ec129...@msnews.microsoft.com...
Jaylee
Willem Olverink
opmaak".
Hier kan je alle voorwaarden opgeven nen parameters welke
bij bepaalde waarden van een cel/kolom bijv. in kleur
wordt weergegeven als er aan een voorwaarde wordt voldaan.
Is de voorwaarde niet meer van toepassing wordt de default
weer teruggezet.
Willem.
>-----Oorspronkelijk bericht-----
>
Jaylee
worden en dat zie ik niet bij voorwaardelijke opmaak.
Ingrid
selecteer alle cellen van de rij die je wil opmaken
ga naar Opmaak - Voorwaardelijke opmaak
bepaal de voorwaarde en gewenste opmaak
bijvoorbeeld voor rij 3
Formule is =K3>0
Voorwaardelijke opmaak kan enkel aan cellen worden toegekend, niet aan een
volledige rij.
Volgende VBA-code kleurt de volledige rij geel als in kolom K een waarde > 0
wordt ingegeven. Als een waarde <= 0 wordt ingevoerd, wordt achtergrondkleur
terug weggehaald.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 11 _
And Target.Row > 0 _
And Target.Row Then
If Target.Value > 0 Then
Rows(Target.Row).Interior.ColorIndex = 6
Else
Rows(Target.Row).Interior.ColorIndex = xlNone
End If
End If
End Sub
Om de macro te kopiėren klik je rechts op de tab (onderaan het scherm) en
kies je in het snelmenu 'Programmacode weergeven'.
Ingrid
"Jaylee" <jayl...@yahoo.com> schreef in bericht
news:3d3fa365...@msnews.microsoft.com...
marc
Ik denk dat dit wel lukt zonder macro:
Selecteer de VOLLEDIGE rij die een kleur moet krijgen.
ga dan naar Opmaak | Voorwaardelijk Opmaak
kies 'Formule is'
typ bijvoorbeeld volgende formule in het formulevak naast 'Formule is'
=$H29>0
stel de gewenste achtergrondkleur in via de knop 'Opmaak'
dan kleurt rij 29 als de waarde in H29 groter is dan 0
De voorwaarden en bereiken kan je zelf aanpassen natuurlijk.
--
Groeten, Marc
Jaylee
De voorwaardelijke opmaak kan ik niet gebruiken omdat ik meer dan 3
rijen heb (ongeveer 20, maar het kan wisselen)
Maar de macro is al een heel eind in de buurt.
Ik ben alleen vergeten te zeggen dat er een som in kolom K staat......
en dat maakt de zaak denk ik wel anders.
Jaylee
On Thu, 25 Jul 2002 09:25:24 +0200, "Ingrid"
<ingrid_bap...@hotmail.com> wrote:
>Met voorwaardelijke opmaak:
>
>selecteer alle cellen van de rij die je wil opmaken
>ga naar Opmaak - Voorwaardelijke opmaak
>bepaal de voorwaarde en gewenste opmaak
>bijvoorbeeld voor rij 3
>Formule is =K3>0
>
>Voorwaardelijke opmaak kan enkel aan cellen worden toegekend, niet aan een
>volledige rij.
>
>
>
>Volgende VBA-code kleurt de volledige rij geel als in kolom K een waarde > 0
>wordt ingegeven. Als een waarde <= 0 wordt ingevoerd, wordt achtergrondkleur
>terug weggehaald.
>
>Private Sub Worksheet_Change(ByVal Target As Excel.Range)
> If Target.Column = 11 _
> And Target.Row > 0 _
> And Target.Row Then
> If Target.Value > 0 Then
> Rows(Target.Row).Interior.ColorIndex = 6
> Else
> Rows(Target.Row).Interior.ColorIndex = xlNone
> End If
> End If
>End Sub
>
>Om de macro te kopiëren klik je rechts op de tab (onderaan het scherm) en
Jaylee
De oplossing van Marc werkt goed en kan ook de som aan!
Bedankt allemaal voor het uitzoeken!
Ingrid, de macro komt vast van pas voor een ander project van me dus
de moeite is niet voor niets geweest!
Jaylee
Rob
"Ingrid" <ingrid_bap...@hotmail.com> schreef in bericht
news:OyX#9w6MCHA.208@tkmsftngp12...
> Met voorwaardelijke opmaak:
>
> selecteer alle cellen van de rij die je wil opmaken
> ga naar Opmaak - Voorwaardelijke opmaak
> bepaal de voorwaarde en gewenste opmaak
> bijvoorbeeld voor rij 3
> Formule is =K3>0
>
> Voorwaardelijke opmaak kan enkel aan cellen worden toegekend, niet aan een
> volledige rij.
>
>
>
> Volgende VBA-code kleurt de volledige rij geel als in kolom K een waarde >
0
> wordt ingegeven. Als een waarde <= 0 wordt ingevoerd, wordt
achtergrondkleur
> terug weggehaald.
>
> Private Sub Worksheet_Change(ByVal Target As Excel.Range)
> If Target.Column = 11 _
> And Target.Row > 0 _
> And Target.Row Then
> If Target.Value > 0 Then
> Rows(Target.Row).Interior.ColorIndex = 6
> Else
> Rows(Target.Row).Interior.ColorIndex = xlNone
> End If
> End If
> End Sub
>
> kies je in het snelmenu 'Programmacode weergeven'.
>
> Ingrid
>
Ik weet niet hoe lang dat je dat er al bij vermeld hoe je die macro kunt
kopieren, maar is wel heel makkelijk.
De macro's vliegen je om de oren hier, maar niet iedereen is op de hoogte
hoe je daar mee omgaat(was ik dus ook niet)
Rob
Ingrid
http://users.pandora.be/ingrid/excel/copyvba.htm
Ingrid
"Rob" <justm...@hotmail.com> schreef in bericht
news:ahp72r$31o$1...@reader07.wxs.nl...
Rob
> Je kan deze informatie nu ook hier vinden:
> http://users.pandora.be/ingrid/excel/copyvba.htm
>
> Ingrid
>
Dank je wel