Darioush

Hi,

How do i write a code in VB to define names for cells in excel?

The following is the code i use but doesn't work.

work***s("Data").Names.Add Name:="myF4",
RefersToR1C1:="=***1!R4C4"
work***s("Data").FormatConditions.Add Type:=xlCellValue,
Operator:=xlGreater, Formula1:="50"
work***s("Data").FormatConditions(1).Interior.Colo rIndex = 6
work***s("Data").FormatConditions.Add Type:=xlCellValue,
Operator:=xlLess, Formula1:="50"
work***s("Data").FormatConditions(2).Interior.Colo rIndex = 42

Thank you for your help.

__________________
Napa Valley wine, wineries, on-line wine sales, lodging, vacations, golf, current events http://www.napavalley.com