DUDA SOBRE VB6 y Excel

[pana99]

En ese caso, deberias usar la propiedd rows para saber desde donde seguirias agregando. y Cambiar en que columna queres los datos Seria asi (para la columna A)

Código:

Private Sub Command1_Click()
Dim txt1, txt2, txt3 As String, txt4 As Integer
Dim openExcel As New Excel.Application
Dim Libro As Excel.Workbook, Hoja As Excel.Worksheet
Dim Aux As Integer
openExcel.Visible = True

Set Libro = openExcel.Workbooks.Open("c:\excel.xls")
Set Hoja = Libro.Worksheets(1)
'Aca guardamos la ultima columna ocupada
Aux = openExcel.Range("a2").CurrentRegion.rows.Count

Hoja.Name = "Ficha de Postulante"
Hoja.Cells(Aux + 1, 1).Value = Text1.Text 
Hoja.Cells(Aux + 2, 1).Value = Text2.Text 
Hoja.Cells(Aux + 3, 1).Value = Text3.Text 
Hoja.Cells(Aux + 4, 1).Value = Text4.Text 

'Esto es para que no te de el mensaje que el archivo ya existe
openExcel.DisplayAlerts = False
Libro.Save
'Activamos los alertas nuevamente
openExcel.DisplayAlerts = True
openExcel.Quit
Set Hoja = Nothing
Set Libro = Nothing
Set openExcel = Nothing
End Sub

Espero te sirva