Eu tenho este código no VBA:
Function SBarvou(range)
If range.Value = "R" Then
SBarvou = "O"
If range.Value = "R" And range.Interior.Color = RGB(255, 255, 0) Then
SBarvou = "O"
SBarvou.Interior.Color = RGB(255, 255, 0)
End If
End...
15.05.2017 / 15:40