Hi,

I was wondering if anyone might be able to help me out. I've got some
error message saying " the formula you typed contains an error" after
putting in the following code.

Here is my code,

for i = 0 to ubound(x)
c = chr(65 + i) + trim(str(Count) ' Count is the row number
with worksheets("Sheet1")
with .range(c$)
.FormatConditions.Delete
.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual,
Formula1:="=my" & c$
.FormatConditions(1).Interior.ColorIndex = 36
.FormatConditions.Add Type:=xlCellValue,
Operator:=xlNotEqual, Formula1:="my" & c$
.FormatConditions(1).Interior.ColorIndex = 42
end with
end with

rowline1 = "my" & c$
mysht = "=Sheet2!R" & cstr(Count) & "C" & cstr(i)
with ActiveWorkbook
.Names.Add Name:=rowline1, RefersToR1C1:=mysht
end with
...

next i

Any ideas?

Thank you in advance


--
associates
------------------------------------------------------------------------
associates's Profile: http://www.excelforum.com/member.php...o&userid=35073
View this thread: http://www.excelforum.com/showthread...hreadid=550789