I think the end of it should go like this:

..Cells(RowToFind, ColToFind) = _
"=Sum(" & Cells(RowToFind, 5).Address(False, False) & ":" & _
Cells(RowToFind, ColToFind - 1).Address(False, False) & ")"

The False's after Address made the references relative. You can drop them
and the parens they are in if you want absolute references.

--
Jim
"Kevin Porter" wrote in message
...
| Yes, reading back over it, it is a bit obscure. Let's try again, because
the
| second one is close to what I need.
|
| I am writing code that looks at a specific cell (RowToFind,ColToFind) and
| checks if it has an error condition, in this case I know it will be a #REF
| error. If it is errored then I want to sum all cells from (RowToFind, 5)
to
| (RowToFind, ColToFind - 1) and write that number into (RowToFind,
ColToFind).
| The following is the code I tried:
|
| If IsError(Cells(RowToFind, ColToFind)) Then Workbooks("SRA Detailed
Payroll
| - " & WBDate & ".xls").Sheets("Shreveport").Cells(RowToFind, ColToFind) =
| "=Sum(cells(RowToFind, 5):cells(rowtofind, coltofind[-1]))"
|
|
| I think I am ok up to the =Sum command.
|
| Thanks again for your help and patience.