Färglägga Celler - olika långa kolumner

[Freppa87]

Hej,

 

jag sitter med ett problem som jag undrar om någon kan hjälpa mig med.

Jag har en kontrollkolumn A som har 30 celler med text och sedan Kolumnerna B C och D som är 40, 80, 200 långa.  Mitt problem är hur man går till med att jämföra A mot B,C,D med färgkodning.

Tanken är att om A cell 1 finns i B cell 10 så skall den färgas grönt.

 

Har mycket basic kunskap om VBA, skulle vara tacksam för lite guidance. 

 

Sub ColorExist()

For each cell in Range("A2:A31)

for i = 1 to 3

if cell.value = cell.offset(0, i). value then

cell.interior.color = x1rgbcolor.rgblightgreen

end if 

next i

next cell

end sub

 

 

Antagenden som jag gör är att den bara kommer gå  längden av Range("A2:A31") dvs 30 gånger, hur gör jag isåfall om jag vill att den går igenom längden av varje kolumn jämtemot kontrollkolumnen?

Sen skulle jag vilja ha en summering av antalet hittade värden, dvs förekomsten av kontrolltabellen i kolumn B, C och D. 

 

Tackar i förväg,

Fredrik

[Monshi]

ta en titt på villkorsstyrd formatering. Om du kan skapa en formel som ger SANT/FALSKT (vilket inte borde vara något problem) ska du kunna få till det du önskar med det verktyget.

VBA behövs inte och ska undvikas om man inte måste ha det.