View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Meihua Liang Meihua Liang is offline
external usenet poster
 
Posts: 1
Default Application-defined or object-defined error

As the following example indicates, the R1C1 reference
style is used in .FormulaR1C1. The A1 reference style is
used with .Formula


'put numbers 2,4,6 in cell A1, A2 and A3
'get the sum in cell A4 and A5 with 2 difference
'reference styles
Sub test()
Range("A4").FormulaR1C1 = "=SUM(R1C1:R3C1)"

'error :
'Range("A4").FormulaR1C1 = "=SUM($A$1:$A$3)"

Range("A5").Formula = "=SUM($A$1:$A$3)"

End Sub


Examples from Microsoft online help:
Worksheets("Sheet1").Range("A1").Formula = "=$A$4+$A$10"

Worksheets("Sheet1").Range("B1").FormulaR1C1 = "=SQRT
(R1C1)"


-----Original Message-----
hello everyone,

I am using VB 6.0 with SP5 on a win2k pro machine

with office 2k
installed.
The following code:

..Cells(RowNo, tCol).FormulaR1C1 = "=Sum(" & .Cells

(RowNo, tCol - 1).Address
& ":" & .Cells(RowNo, tCol - UBound(arrVehicles)).Address

& ")"

returns a "Application-defined or object-defined error"

1004.

how ever, when i went to debug mode and saw the values it

showed me

$F$20 = Sum($E$20:$C$20)

which is correct, but the error still appears.

wht I am trying to do here is adding up the previous 3

cell values to the
fourth one.
Can any one help me out?


.