Visual Basic para Aplicaciones - Leer los datos de una celda en Excel

Hola, necesito leer información de una hoja de cálculo en Excel y pasar eso a un archivo txt. Cómo puedo hacerlo?
Desde ya muchas gracias

Para abrir Excel y un archivo especifico puedes usar este codigo :

'Captura de errores
On Error Resume Next

'Hace una referencia a la aplicación Excel
Set objExcel = GetObject(, "Excel.Application")

'Si nos da error significa que Excel NO esta en ejecucion
If Err.Number = 429 Then
Err.Clear
'Creamos una NUEVA instancia de Excel
Set objExcel = CreateObject("Excel.Application")
End If

' Mostrar el Excel
objExcel.Visible = True

Ruta1 = App.Path & "\Reporte.xls"
Set objLibro = objExcel.WorkBooks.Open(Ruta1)

' ----------------------------------------------------
' Para leer alguna celda lo pueds hacer asi
' ----------------------------------------------------
' MsgBox objLibro.Worksheets(1).Range("B2").Value

Para guardar un archivo puedes poner :

open "archivo.txt" for output as #1
write #1, variable
'....
close #1

Checa "print" en lugar de "write".. no se cual de los dos pero alguno escribe los datos con las comillas dentro

Si lo haces en VBA en Excel, la apertura es con

Workbooks.open filename:= [ruta y nombre del archivo.xls]

Si ese mismo archivo querés grabarlo en txt tenés que hacer lo siguiente

por ejemplo

activeworkbook.saveas filename:=[ruta y nombre] ,fileformat:=xlTextPrinter

Espero te sirva mi ayuda