Skús toto makro. Nastav sa do bunky ktorú chceš zvýrazniť(B2). Porovnávaná bunka musí byť vľavo.(A2). Na viac buniek to musíš skombinovať ako píše PaloPa Sub oznac() Dim a As String, b As String Dim i As Long, j As Long, k As Long a = Selection.Value b = Selection.Offset(0, -1).Value If a <> b Then For i = 1 To Len(a) If Mid(a, i, 1) <> Mid(b, i, 1) Then j = InStr(i, a, " ") k = InStrRev(a, " ", i) End If Next ActiveCell.FormulaR1C1 = Selection.Value With ActiveCell.Characters(Start:=k, Length:=j - k).Font .FontStyle = "Tučné" .Color = -16776961 End With End If End Sub
MAX(B2:B15) ti nestačí?