Help!

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

Hulp bij posten

Recente topics

Auteur Topic: mbv vba code de opmaak van een cel cursief maken (voorwaardelijke opmaak)  (gelezen 4195 keer)

0 leden en 1 gast bekijken dit topic.

Offline Lijsterke

  • Lid
  • *
  • Berichten: 13
  • Oplossing.be
Hallo iedereen,

Ik wil na het doorlopen van mijn macro de layout van de tijdens de macro aangemaakte werkbladen aanpassen. Ik schrijf daarvoor ook een macro zodat alle bladen dezelfde opmaak krijgen met 1 klik.
Maar vermits in elk van die bladen de gegevens in andere cellen staan, zit ik een beetje vast.

Ik dacht dit met voorwaardelijke opmaak op te lossen, want het zit zo dat als de cel in kolom A in die rij leeg is, dan moet de tekst in de cellen in kolommen D, E , F en G cursief zijn.
BV cel A1 is leeg dan cel D1 en E1 en F1 en G1 moeten cursief opgemaakt worden.

Ik heb getracht dit met een macro op te nemen, maar dan staat er enkel in de code dat ik het bereik geselecteerd heb. Dus daar kom ik niet veel verder mee.

Ik heb ook hier op het forum al wat rondgekeken, maar alle code die ik vind over 'voorwaardelijke opmaak' gaat over het inkleuren van de cellen met een bepaalde kleur. Maar ik weet niet hoe ik die code moet aanpassen naar opmaak 'cursief'.

Kan iemand me helpen?

Alvast bedankt!

Offline Cobbe

  • Lid
  • *
  • Berichten: 35
  • Oplossing.be
Re: mbv vba code de opmaak van een cel cursief maken (voorwaardelijke opmaak)
« Reactie #1 Gepost op: 25 september 2016, 21:54:36 »
Test deze eens:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Range("D1:G1").Font.Italic = Range("A1") = ""
End Sub
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline Lijsterke

  • Lid
  • *
  • Berichten: 13
  • Oplossing.be
Re: mbv vba code de opmaak van een cel cursief maken (voorwaardelijke opmaak)
« Reactie #2 Gepost op: 26 september 2016, 14:44:04 »
Dag Cobbe,

Bedankt voor de snelle reactie! Het lukt me echter niet om de code te doen werken.
Ik vrees dat het aan mijn vba-skills ligt ;), ik heb nog nooit een worksheet_selectionchange gebruikt en heb dus ook geen idee wat het juist doet en wanneer en dus al helemaal niet hoe ik het tussen mijn reeds geschreven macro moet zetten om het te doen werken.

Sorry hè!

Groet



Offline Cobbe

  • Lid
  • *
  • Berichten: 35
  • Oplossing.be
Re: mbv vba code de opmaak van een cel cursief maken (voorwaardelijke opmaak)
« Reactie #3 Gepost op: 26 september 2016, 15:26:45 »
Tja, dan schakelen we over op plan B. :)

Kan je je bestand niet posten?
Of tenminste een voorbeeldbestand waarin je aangeeft wat er wanneer moet gebeuren.
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline Lijsterke

  • Lid
  • *
  • Berichten: 13
  • Oplossing.be
Re: mbv vba code de opmaak van een cel cursief maken (voorwaardelijke opmaak)
« Reactie #4 Gepost op: 26 september 2016, 18:50:45 »
Dag Cobbe,

Ik doe een voorbeeldbestand in de bijlage.

Als je mijn module 1 laat lopen, dan worden een aantal nieuwe werkbladen aangemaakt, eentje per begunstigde, met een overzichtstabel van klanten en factuurnummers.
In die tabel zou ik graag hebben dat de opmaak van de cellen waarin het "totaal voor klant" en "klant" en "het bedrag" staat cursief willen zetten en links uitgelijnd in de cel. Het gaat met andere woorden over kolommen D tem G, maar enkel voor de lijnen waar een totaal instaat en dat zijn dus de rijen waar in kolom A geen klantnaam staat, vandaar dat ik dacht die voorwaarde aan de opmaak te koppelen.

Ik hoop dat je een beetje begrijpt waar ik naartoe wil ;)

groet

Offline Cobbe

  • Lid
  • *
  • Berichten: 35
  • Oplossing.be
Re: mbv vba code de opmaak van een cel cursief maken (voorwaardelijke opmaak)
« Reactie #5 Gepost op: 26 september 2016, 19:14:48 »
Hoop dat dit voldoet.
De code doet zijn werk bij het openen van het werkblad 'Begunstigde'
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline Lijsterke

  • Lid
  • *
  • Berichten: 13
  • Oplossing.be
Re: mbv vba code de opmaak van een cel cursief maken (voorwaardelijke opmaak)
« Reactie #6 Gepost op: 26 september 2016, 21:19:29 »
Dag Cobbe,

Ik heb nog steeds een probleempje. Jouw code werkt op het blad begunstigde dat reeds bestaat. Maar eigenlijk zou het moeten werken op de nieuwe bladen die aangemaakt worden (bv 105, 108, ...) na het doorlopen van de macro die ik maakte. En als ik me niet vergis, lukt dat niet met je code omdat die gekoppeld is aan het blad, maar dat lukt natuurlijk niet voor een nog onbestaand blad.

Of begrijp ik het nog niet helemaal goed?

groet

Offline Cobbe

  • Lid
  • *
  • Berichten: 35
  • Oplossing.be
Re: mbv vba code de opmaak van een cel cursief maken (voorwaardelijke opmaak)
« Reactie #7 Gepost op: 26 september 2016, 21:33:50 »
Ik heb de code nu in ThisWorkbook gezet en wordt actief bij de activering van een werkblad.
Maar niet voor de werkbladen "afzender...."
Dus wel voor het blad begunstigde en alle volgende bladen die je aanmaakt en opent.
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline Lijsterke

  • Lid
  • *
  • Berichten: 13
  • Oplossing.be
Re: mbv vba code de opmaak van een cel cursief maken (voorwaardelijke opmaak)
« Reactie #8 Gepost op: 26 september 2016, 22:58:30 »
Dag Cobbe,

Hartelijk bedankt! Het doet nu idd wat ik wil.
Ik begrijp er nog altijd niet veel van  :-[, maar dat is bijzaak  ;)

Bedankt!!

Groet

 


www.combell.com