Villkorsstyrd formatering via makro?

[Mikael63]

Jag trodde att jag enkelt skulle kunna spela in ett makro men det vill sig inte...

Det är i bilden markerad regel jag vill köra men den ska endast avse A3 till tja A2000

Jag behöver här kolla om samma värde finns inskriven någonstans i A3-A2000

(formeln nedan kollar i både A &

 

=OCH(A1<>"";PRODUKTSUMMA(($A$1:$B$434=A1)*1)>1)

Redigerad September 8, 2023 av Mikael63

[Mikael63]

Efter lite mat och lite eftertanke, där man ex. kan notera att ett inspelat testmakro med namn Makro1 inte nödvändigtvis hamnar i Modul1... 🤪

    Range("A3:A1500").Select
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=OCH(A3<>"""";PRODUKTSUMMA(($A$3:$A$1500=A3)*1)>1)"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .Color = 65535
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False
    Range("A2").Select

 

[MH_]

Mat och eftertanke är kraftigt underskattat. 🧍‍♂️🤸‍♂️  🧍‍♂️