Ver Mensaje Individual
  #1 (permalink)  
Antiguo 19/11/2009, 12:10
Eiabel
 
Fecha de Ingreso: noviembre-2009
Mensajes: 14
Antigüedad: 14 años, 6 meses
Puntos: 0
Pregunta DUDA SOBRE VB6 y Excel

Hola,
Tengo una consulta, espero puedan ayudarme, quiero ingresar diferentes datos a una hoja de excel a travez de un formulario hecho en VB6. Mis primeros datos los ingreso sin problemas, sin embargo cuando quiero ingresar nuevos datos estos reemplazan a los primeros. Quisiera saber si existe la forma de ir llenando la lista sin chancar la información ya existente.
A continuación pego mi codigo si es que sirve de algo. Muchas gracias por la atención prestada.

Option Explicit
Private Sub Command1_Click()
Dim txt1, txt2, txt3 As String
Dim txt4 As Integer
Dim openExcel As New Excel.Application
Dim Libro As Excel.Workbook
Dim Hoja As Excel.Worksheet
openExcel.Visible = True
Set Libro = openExcel.Workbooks.Open("c:\excel.xls")
Set Hoja = Libro.Worksheets(1)
Hoja.Name = "Ficha de Postulante"
Hoja.Cells(2, 2).FormulaR1C1 = Text1.Text
Hoja.Cells(2, 3).FormulaR1C1 = Text2.Text
Hoja.Cells(2, 4).FormulaR1C1 = Text3.Text
Hoja.Cells(2, 5).FormulaR1C1 = Text4.Text
Libro.Save
openExcel.Quit
Set Hoja = Nothing
Set Libro = Nothing
Set openExcel = Nothing
End Sub