pivot makro

Den værdi som skal være >100, er celle værdien ikke rækkens samlet værdi.

hvad skal jeg bruge ?? For each eller if ??

Du kan evt. bruge betinget formatering (format-menuen) til formålet.

Det er i en pivot tabel, hvor teksten kan stå mange steder, så det er bedst med en makro.

Jeg har lavet den selv, så jeg lukker spørgsmålet, men poster alligevel resultatet.

Sub RField()

Range("A1").Select

t = 1

Do While t = 1
Cells.Find(What:="TEKST", After:=ActiveCell, LookIn:=xlFormulas, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext).Activate

rwnr = ActiveCell.Row
clnr = ActiveCell.Column

If rwnr < rwnrny Then t = 0
Range(Selection, Cells(ActiveCell.Row, 255)).Select

For Each cell In Selection
        If cell.Value >100 Then cell.Font.ColorIndex = 3
    Next

rwnrny = rwnr + 1
Cells(rwnrny, clnr).Select

Loop

Range("A1").Select

End Sub