Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Voorwaardelijke opmaak  (gelezen 3044 keer)

0 leden en 1 gast bekijken dit topic.

Offline EricV

  • Volledig lid
  • **
  • Berichten: 138
  • Oplossing.be
Voorwaardelijke opmaak
« Gepost op: 02 oktober 2006, 16:05:25 »
Goedemiddag,

In een werkblad zijn de cellen in rij 10 gevuld van A10 t/m U10, rij 11 van A11 t/m U11, enz.
(in sommige cellen staan waardes, in sommige andere cellen staan "Als-formules"). Rij 10 heeft van A10 t/m U10 een bepaalde opmaak, sommige cellen hebben een bepaalde kleur en weer andere cellen hebben een andere kleur (deze kleuren zijn niet afhankelijk van de inhoud van de cellen).

De nieuwe in te vullen regels zijn nog volledig wit en hebben dus nog niet de opmaak van de regels daarboven.

Ik zou nu graag willen dat als ik in cel C15 iets invul dat rij 15 dan precies dezelfde opmaak krijgt als rij 10. Bij invullen van cel C16 moet rij 16 de opmaak krijgen van rij 11, enz. en bij invullen van cel C19 moet rij 19 de opmaak krijgen van rij 14.

Is dit mogelijk met voorwaardelijke opmaak ? Ik ben er al mee bezig geweest, maar helaas krijg ik het niet voor elkaar.
Of moet dit met VBA ? Kan hier iemand misschien iets voor bedenken ?

Zie bijlage. (voorbeeld)

Bedankt,

M.vr.gr.
Eric
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.191
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re:Voorwaardelijke opmaak
« Reactie #1 Gepost op: 02 oktober 2006, 18:09:22 »
Hallo Eric,

iets in deze aard zou moeten werken, maar er zitten nog wat fouten in. Maar zo kan je al verder tot de bollebozen hier zijn:


Private Sub Worksheet_Change(ByVal Target As Range)
Dim getal As Integer
    Range("C15").Select
    If Selection.Value > 0 Then
    getal = Selection.Value
    Range("A10:U10").Select
    Selection.Copy
    Range("A15:U15").Select
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False
    Range("C15").Select
    ActiveCell.FormulaR1C1 = getal
End If
End Sub


:) SoftAid :)
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline EricV

  • Volledig lid
  • **
  • Berichten: 138
  • Oplossing.be
Re:Voorwaardelijke opmaak
« Reactie #2 Gepost op: 03 oktober 2006, 11:37:25 »
Softaid,

Bedankt voor je eerste aanzet.
Ik hoop dat er nog meer reacties komen.

Gr.
Eric
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline droedel

  • Volledig lid
  • **
  • Berichten: 116
  • Oplossing.be
Re:Voorwaardelijke opmaak
« Reactie #3 Gepost op: 03 oktober 2006, 11:51:02 »
Hallo

ik zie dat iedere rij dezelfde opmaak heeft. Waarom werk je dan niet met voorwaardelijke opmaak? Zo kan je iedere rij dezelfde opmaak geven als de vorige.
vb in cel A15: voorwaardelijke opmaak: als formule is: A15<>"", en geef dan de opmaak in, nl de gewenste kleur in 'patronen'
succes
Vista Home Premium, 1022 MB Ram, Intel Core 2 CPU 6400 @2.13Ghz

Offline EricV

  • Volledig lid
  • **
  • Berichten: 138
  • Oplossing.be
Re:Voorwaardelijke opmaak
« Reactie #4 Gepost op: 06 oktober 2006, 08:28:50 »
Beste Droedel,

Niet elke rij heeft dezelfde opmaak. Als dat zo was dan kon ik inderdaad gebruik maken van de voorwaardelijke opmaak zoals je aangeeft.
Het is iedere keer een groep van vijf rijen waarvan de eerste steeds aan de bovenkant een dikkere rand heeft.

Helaas kom ik er mbv. een macro niet uit omdat ik gewoon te weinig kennis heb. Ik hoop dan ook dat iemand er wel een oplossing voor heeft.

Groeten,
Eric
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re:Voorwaardelijke opmaak
« Reactie #5 Gepost op: 08 oktober 2006, 16:06:19 »
Je kan ook in je voorwaardelijke opmaak een 2e opmaak toevoegen. Dit is er een die ik nog al 'ns gebruik als ik om de X rijen een lijn wil tonen: =MOD(ROW()-1;5)=0
Ik ga er in deze formule vanuit dat de 1e rij je headers bevat, vandaar dat ik ROW()-1 doe. Vervolgens wordt er getest of de rest van het Rijnummer gedeeld door 5 nul is. Zo ja, zet een lijn....
Ik hoop dat je hier iets aan hebt.\
Groet, Leo
______________________________

Groet, Leo

 


www.combell.com