escribir una serie de datos en excel

[kadosh]

hola, supongo que esto ya lo declaraste ...

Dim objExcel As Excel.Application

y por ejemplo

If FrmVerCliente.MSHFlexGrid1.Visible = True Then
If RS.RecordCount = 0 Then
MiMsgBox "AVISO DEL PROGRAMA", "NO HAY MOVIMIENTOS PARA ESTA ACCION!!", , Warning
Exit Function
End If

luego

Set objExcel = New Excel.Application
objExcel.Visible = True
'determina el numero de hojas que se mostrara en el Excel
objExcel.SheetsInNewWorkbook = 1
'Crea el Libro
objExcel.Workbooks.Add

y podrias poner esto , te lo pone tal cual...

rangosumad = "aca pones lo que quieras = lo que quieras pone aca"
rangosumae = "124 = 12,4 * 10"
objExcel.ActiveSheet.Cells(V + 1, 4) = rangosumad
objExcel.ActiveSheet.Cells(V + 1, 5) = rangosumae

y te aparece en la celda como si la ubieses tipeado en el libro mismo o mejor dicho en la celda..
no se si entendi bien , eso es lo que necesitabas?