Voorwaardelijk op gemaakte cellen blijven niet rood

[fwalraven]

Haije,

Tabels hebben verschillend aantal kolommen, Ingepland 13 en Afgenomen 11.

"N" is dan de eerst volgende lege kolom in Ingepland
"L" de eerst volgende lege kolom in Afgenomen, Vandaar dat er "L" in de formule staat

Zou de macro werken "L" in de formule dan worden de gegevens ook wel in kolom "N" geplaatst.

Maar helaas ook de verandering in "L" levert #naam? op.

Frans

 

[Haije]

Welke uitkomst verwacht je in LA van tabblad AFGENOMEN?

Er bestaat wel eens functie N, maar geen functie L

 

[fwalraven]

Voor mij verwijst de "L" en de "N naar de kolom waar net als bij ingepland een "1" komt te staan.

Frans

 

[AD1957]

#42 Dan heb je onderstaande niet gelezen./begrepen.

Er bestaat wel eens functie N, maar geen functie L

https://support.microsoft.com/nl-nl/office/n-functie-a624cad1-3635-4208-b54a-29733d1278c9

 

[fwalraven]

Oke,

Macro voor tabel Ingepland (13 kolommen) werkt goed, er komt "1" in kolom "N"

 With Sheets("INGEPLAND").Cells(1).CurrentRegion.Resize(, 14)
    .Columns(14).FormulaR1C1 = "=N(COUNTIFS(Kolom_A,RC[-13],Kolom_M,RC[-1])>1)"
      .Columns(14).Value = .Columns(14).Value
    .RemoveDuplicates Array(1, 13), xlNo
    End With
End Sub

Macro voor tabel Afgenomen(11 kolommen) geeft nog steeds #naam? in plaats van "1" in kolom "L".
Ondanks de aanpassing van L in N in regel: =N(COUNTIFS(Kolom_A,RC[-11],Kolom_K,RC[-1])>1)"

With Sheets("AFGENOMEN").Cells(1).CurrentRegion.Resize(, 12)
    .Columns(12).FormulaR1C1 = "=[COLOR="#FF0000"]N[/COLOR](COUNTIFS(Kolom_A,RC[-11],Kolom_K,RC[-1])>1)"
    .Columns(12).Value = .Columns(12).Value
    .RemoveDuplicates Array(1, 11), xlNo
    End With
    End Sub

Frans

 

[AD1957]

Vreemd, geen idee waardoor dit komt.
Misschien de vraag maar eens op "niet opgelost" zetten, er zitten hier cracks op het forum die zeker een
oplossing zullen weten.

 

[Haije]

Ondanks de aanpassing van L in N in regel: =N(COUNTIFS(Kolom_A,RC[-11],Kolom_K,RC[-1])>1)"

in deze formule komt voor "KOLOM_K" in je benoemde bereiken staat bij naam KOLOM_M:

=VERSCHUIVING(AFGENOMEN!$K$1;0;0;AANTALARG(AFGENOMEN!$K:$K);1)

Volgens mij moet de juiste formule zo:
=N(COUNTIFS(Kolom_A,RC[-11],Kolom_M,RC[-1])>1)

 

[Haije]

Of je past de verwijzing bij de naam aan

 

[fwalraven]

Haije,

K verandert in M en nu werkt het wel. :thumb:

=N(COUNTIFS(Kolom_A,RC[-11],Kolom_M,RC[-1])>1)

Maar de logica hiervan ontbreekt mij volledig.

In tabel Ingepland is kolom M de laatste kolom
terwijl in Afgenomen kolom K de laatste kolom is

Vandaar zo in de formule verwerkt.

Frans

 

[Haije]

Frans,

KOLOM_K in je formule verwijst naar een benoemd bereik, NIET naar kolom K.

 

[AD1957]

Ik had totaal niet in de gaten dat Kolom_K niet in de benoemde bereiken stond.

 

[fwalraven]

@Haije,

Duidelijk:thumb:
Ik maar denken dat het bereik van Ingepland van kolom A tm kolom M was. en dus in eerst volgende kolom N de waarde "1" komt.
Dit had ik al als een goed werkende formule.

Daarom dacht Afgenomen simpel aan te passen.
Dus voor macro Afgenomen van N een L gemaakt en kolom nummers 14 veranderd in 12 en kolom 13 in 11
en het had voor mij moeten werken, dus niet.

@AD1957,

Toch bedankt voor het meedenken
Fout van de functie N had ik eigenlijk ook moeten weten.

Frans