• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Rij voorwaardelijke opmaken

Status
Niet open voor verdere reacties.

PajaNegor

Gebruiker
Lid geworden
10 feb 2009
Berichten
6
Hallo Excel ingenieurs

Ik heb een vraag betreffende voowaardelijke opmaak.
Als ik een cel (A7) een kleurnaam "Blauw" geef, wil ik dat A7 tm J7 blauw gekleurd worden.
Dit kan met de formule voorwaardelijke opmaak, maar ik wil dit voor meerdere kleuren.
Ik ben daarom aangewezen op de VBA kennis van jullie.

Zie bijgevoegd excel bestand

Bij voorbaat dank.

PajaNegor
 

Bijlagen

Als je een getal invoert in de A-kolom, dan krijgen de rij van kolom A t/m kolom J de bijbehorende kleur.

Met vriendelijke groet,


Roncancio
 

Bijlagen

Als je een getal invoert in de A-kolom, dan krijgen de rij van kolom A t/m kolom J de bijbehorende kleur.

Met vriendelijke groet,


Roncancio

Dit werkt bijzonder goed.
Mijn vraag is echter wat gecompliceerder.
Ik wil nl. geen kleurnummers invullen maar kleurnamen.
Met andere woorden gewoon tekst.

Ik zit met een ander plobleem
Er zit al een code Private Sub Worksheet_Change in, zodat ik een foutmelding krijg.
De eerste sub zorgt dat ik op het blad index de naam van de tabs kan wijzigen.
De tweede zou dan zorgen voor de voorwaardelijke kleur

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
    If Target.Column = 1 Then
    If Range("A" & Target.Row) = "" Then
        Sheets(Target.Row).Name = "Sheet" & Target.Row
    Else
        Sheets(Target.Row).Name = Range("A" & Target.Row)
    End If
End If
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 And IsNumeric(Target.Value) And Target.Column = 1 Then Range("A" & Target.Row & ":J" & Target.Row).Interior.ColorIndex = Target.Value
End Sub

Wie weet DE oplossing

Groeten PajaNegor
 

Bijlagen

Als je in cel M2 een kleur kiest, dan worden de cellen van de kolommen M t/m R in die kleur weergegeven.

Met vriendelijke groet,


Roncancio
 

Bijlagen

Als je in cel M2 een kleur kiest, dan worden de cellen van de kolommen M t/m R in die kleur weergegeven.

Met vriendelijke groet,


Roncancio

Roncancio,

Geweldig dit is precies wat ik bedoel.

Het probleem is echter dat de achtergondkleur weleens hetzelfde is als de tekstkleur of nauwelijks daarvan te onderscheiden.

Is hier ook iets voor?
 
Roncancio,

Geweldig dit is precies wat ik bedoel.

Het probleem is echter dat de achtergondkleur weleens hetzelfde is als de tekstkleur of nauwelijks daarvan te onderscheiden.

Is hier ook iets voor?

Ik zou bijna zeggen: "kies een andere kleur", maar dat is wel erg flauw.
Wat had je zelf in gedachten?
Je kunt wel controleren of de tekstkleur en de achtergrondkleur identiek zijn, maar om met alle combinaties rekening te houden is ondoenlijk.

Met vriendelijke groet,


Roncancio
 
Ik zou bijna zeggen: "kies een andere kleur", maar dat is wel erg flauw.
Wat had je zelf in gedachten?
Je kunt wel controleren of de tekstkleur en de achtergrondkleur identiek zijn, maar om met alle combinaties rekening te houden is ondoenlijk.

Met vriendelijke groet,


Roncancio

Roncancio,

Ik ben hier al erg blij mee, bedankt
 
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan