Markro ile şöyle yapabilirsin:
NOTLAR:
1) i burada başlangıç satırın; istediğin gibi ayarlayabilirsin
2) U ve V değerlerini A ve B sütunlarında olduğunu varsaydım. A'nın sütun değeri 1, B'nin ki 2 (yani cells(1,2) demek 1. satır, B sütunu)
Yapamazsan mesaj gönder.
Sub renk()
For i = 1 To 500
If Cells(i, 1) - Cells(i, 2) < 1 Then
Range(i & ":" & i).Select
Selection.Font.ColorIndex = 3
End If
Next i
End Sub
0