tkaplan
04-07-2009, 07:42 AM
Hi all,
So I have a worksheet where columns a & b are row headers. column c is data i'd like to compare to. so for columns e thru however many columns there are, from rows 3 thru 34, i want to compare the data to the data in column c and if it's different then make it bold and red.
i'm at the point in my macro where cell d1 is the active cell. here's what i have:
If plansFormatted > 1 Then '(this is because there are other formats happening to column c first and i dont want this to run on column c)
Range(ActiveCell.Offset(2, 0), ActiveCell.Offset(33, 0)).Select
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=D3<>$C3" '(I know that this is where my problem lies - i just dont know how to fix it)
With Selection.FormatConditions(1).Font
.Bold = True
.Italic = False
.ColorIndex = 3
End With
ActiveCell.Offset(-2, 0).Activate
End If
ActiveCell.Offset(0, 1).Select
then i have this repeating for however many columns I have which I figured out earlier.
So this works for column D. the problem is that the "=D3<>$C3" doesnt change to E3 for column E, etc. I just dont know how to say "= whatever the column currently is and row currently is" etc.
any help would be really appreciated!
thanks!
So I have a worksheet where columns a & b are row headers. column c is data i'd like to compare to. so for columns e thru however many columns there are, from rows 3 thru 34, i want to compare the data to the data in column c and if it's different then make it bold and red.
i'm at the point in my macro where cell d1 is the active cell. here's what i have:
If plansFormatted > 1 Then '(this is because there are other formats happening to column c first and i dont want this to run on column c)
Range(ActiveCell.Offset(2, 0), ActiveCell.Offset(33, 0)).Select
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=D3<>$C3" '(I know that this is where my problem lies - i just dont know how to fix it)
With Selection.FormatConditions(1).Font
.Bold = True
.Italic = False
.ColorIndex = 3
End With
ActiveCell.Offset(-2, 0).Activate
End If
ActiveCell.Offset(0, 1).Select
then i have this repeating for however many columns I have which I figured out earlier.
So this works for column D. the problem is that the "=D3<>$C3" doesnt change to E3 for column E, etc. I just dont know how to say "= whatever the column currently is and row currently is" etc.
any help would be really appreciated!
thanks!