Visual Basic - Pregunta dificil.

Hola amigos:
Tengo una variable con un valor que quiero pasar a una hoja de Excel.

Por ejemplo:
Si tengo la variable TOTAL y quiero pasarla a una hoja electronica "TOTALES.XLS" en la "HOJA1" celda "A5"

¿Como lo hago?
¿Como hago para que cada dia almacena el TOTAL en la celda siguiente (A5, A6, A7.....)?

GRACIAS.

1)Tienes que crear el objeto de Excel a nivel modulo:
Public objExcel As Excel.Application

2)Llamas a uns rutina para Iniciar Excel:
Sub Inicia_Excel()
Dim xlsArchivo As String

xlsArchivo = App.Path & "\TOTALES.xls"

Set objExcel = CreateObject("EXCEL.APPLICATION")
objExcel.Visible = False
objExcel.Workbooks.Open FileName:= xlsArchivo, ReadOnly:=False, ignoreReadOnlyRecommended:=True
End Sub

3)Cargas la data
Sub Cargar()
Dim J as Long
On Error Resume Next
J = GetSetting(App.Title, "UltimaCelda", "Valor") 'Lee ultima Celda
J = J + 1
SaveSetting App.Title, "UltimaCelda", "Valor", J 'Guarda nuevo valor
objExcel.ActiveSheet.Cells(1, J) = Titulo 'Graba en Excel
objExcel.Quit
End Sub

Saludos desde Lima