Indien actieve regel kolommen I, J, K, L niet leeg zijn; dan...

[Robert Smidt]

Beste Helpmij'ers,

Ik ben op zoek naar een eenvoudige code die in actie komt wanneer de kolommen I, J, K, L van de actieve regel niet leeg zijn. Ik dacht dat ik hier over beschikte, maar deze is niet juist. t.w.:

If Cells(Target.Row, 9).Resize(, 4) <> "" Then

Wie zou mij hierbij kunnen helpen.

Alvast bedankt.

Robert

 

[VenA]

zo?

If application.counta(Cells(Target.Row, 9).Resize(, 4))= 4 Then

 

[Robert Smidt]

Sorry voor de late reactie....De code werkt perfect, ik heb nog één vraag: hoe ziet de code eruit wanneer de betreffende kolommen leeg zijn i.p.v. gevuld. Ik verwacht dat de laatste (4) gewijzigd moet worden.

 

[HSV]

Dan test je je vermoeden toch even.

 

[Robert Smidt]

Mijn verontschuldiging, ik stelde de vraag niet helemaal juist. Ik bedoel: hoe ziet de code er uit wanneer één of meerdere van voornoemde kolommen leeg is.

 

[HSV]

= is <>

 

[Robert Smidt]

Heel erg bedankt voor de super snelle reactie en alvast fijne feestdagen.