rango (??)

hola a todos !

desde mi aplicación en acces tengo que ingresar una fórmula en una celda que me sume el siguiente rango:

la primerr celda del rango esta dada por (3,xlcolumna) y la última por (fila,xlcolumna)

lo hice de la siguiente forma:

Set rangeSuma = appExcel.sheets(1).Range(appExcel.sheets(1).cells(3, xlColumna), appExcel.sheets(1).cells(fila, xlColumna))
appExcel.sheets(1).cells(fila + 2, xlColumna).Formula = "=Sum(" & rangeSuma & ")"


pero conseguí mas una ensalada que lo que estaba buscando\ y por supuesto no logro que funcione\ alguien me puede dar una mano?\ muchas gracias\ dorian+