Help!

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

Hulp bij posten

Recente topics

Auteur Topic: VBA en voorwaardelijke opmaak  (gelezen 410 keer)

0 leden en 1 gast bekijken dit topic.

Offline BlackDevil

  • Volledig lid
  • **
  • Berichten: 215
  • Geslacht: Vrouw
  • Oplossing.be
Re: VBA en voorwaardelijke opmaak
« Reactie #15 Gepost op: 03 april 2021, 18:41:09 »
@SoftAid,

Het was dus over die alinea (met de *edit*) dat ik het had toen ik zei dat ik duidelijk wat verward was.
Het is zo dat er regelmatig nieuwe rijen toegevoegd worden maar nooit volledig lege rijen.
Er word door VBA nieuwe indexeringen uit de drie indexeringstabellen toegevoegd aan de totaal-tabel en die bevatten
dus uiteraard wel gegevens. De eerste 5 cellen en de laatste 2 cellen van elke rij zijn altijd ingevuld...
De overige 11 cellen worden aangevuld naargelang de indexeringen werden uitgevoerd.
En om makkelijker te kunnen zien waar er nog ontbrekende gegevens zijn wou ik dus de complete rijen inkleuren.

Mijn excuses voor de verwarring  :-[

groetjes,
BlackDevil
Windows 10 Home v. 20H2 / Intel(R) Core(TM) i3-3110M CPU @ 2.40GHz 2.40GHz / RAM : 8,00 GB (7,89 GB beschikbaar) / 64-bits besturingssysteem, x64-processor / Intel(R) 7 Series Chipset Family SATA AHCIController / Qualcomm Atheros AR8161 PCI-E Gigabit Ethernet Controller (NDIS 6.30) / Qualcomm Atheros AR9485 Wireless Network Adapter / HGST HTS541010A9E680 / Samsung STORY Station / Seagate Backup+ Hub / Seagate BUP Slim / Seagate Expansion Desk / HP OfficeJet 3831
Bullguard Premium Protection

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 18.861
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: VBA en voorwaardelijke opmaak
« Reactie #16 Gepost op: 03 april 2021, 18:49:10 »
Hallo BlackDevil,

Dank voor de verduidelijking.
Als we dus de code van Albert toevoegen aan Sub Geboorten(), en de laatste rij (van dat ogenblik) bepalen aan de hand van rij  A,B,C,D,E, R of Q is alles in orde?

albert, ga je gang  :thumbsup:

Groeten,

:) SoftAid :)             
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 BlackDevil

  • Volledig lid
  • **
  • Berichten: 215
  • Geslacht: Vrouw
  • Oplossing.be
Re: VBA en voorwaardelijke opmaak
« Reactie #17 Gepost op: 04 april 2021, 12:26:03 »
Hey SoftAid en Albert,

Heb zelf nog wat verder gepuzzeld en heb uiteindelijk onderstaande code toegevoegd aan mijn drie 'bijwerk'-opdrachtknoppen en alles werkt nu zoals het hoort te werken.

rijen = .Cells(Rows.Count, "E").End(xlUp).Row
   For i = 3 To rijen
   teller = Range("E" & i & ":R" & i).SpecialCells(2).Count
   If teller = 14 Or (teller = 10 And .Cells(i, 10) > 0 And .Cells(i, 11) <> "" And .Cells(i, 15) = "" And .Cells(i, 16) = "") Then
   Range("A" & i & ":R" & i).Interior.ColorIndex = 8
   End If
   Next i

Nogmaals nen dikke merci voor de hulp  :thumbsup:

groetjes,
BlackDevil
Windows 10 Home v. 20H2 / Intel(R) Core(TM) i3-3110M CPU @ 2.40GHz 2.40GHz / RAM : 8,00 GB (7,89 GB beschikbaar) / 64-bits besturingssysteem, x64-processor / Intel(R) 7 Series Chipset Family SATA AHCIController / Qualcomm Atheros AR8161 PCI-E Gigabit Ethernet Controller (NDIS 6.30) / Qualcomm Atheros AR9485 Wireless Network Adapter / HGST HTS541010A9E680 / Samsung STORY Station / Seagate Backup+ Hub / Seagate BUP Slim / Seagate Expansion Desk / HP OfficeJet 3831
Bullguard Premium Protection

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 18.861
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: VBA en voorwaardelijke opmaak
« Reactie #18 Gepost op: 04 april 2021, 12:34:56 »
Graag gedaan  ;D

:) SoftAid :)             
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 !

 


www.combell.com