Visual Basic 6.0 &Excel

Question

hola, quisiera que alguien me ayudara pues necesito guardar información contenidas en cajas de texto en un documento de Excel.

Answer 1

Hola:

 

Un ejemplo:

 

http://www.gamarod.com.ar/trucos/como_crear_y_llenar_una_hoja_de_calculo_de_excel_en_visual_basic.asp

 

Salu2

 

Colabora con el foro: Si la respuesta te es de utilidad marca la pregunta como respondida.

Luis Ruiz Pavón

MCP - MCTS

Blog: http://geeks.ms/blogs/lruiz

Answer 2

También puedes darte una vuelta por el foro, hay muchos hilos sobre la materia.

 

Te he seleccionado uno de ejemplo:

http://forums.microsoft.com/msdn-es/ShowPost.aspx?PostID=1991961&SiteID=11

 

Salud y suerte!

 

Answer 3

creo que, en casos como este, que lo amerita, podría cada sector tener un post específico para ir publicando manuales, tutoriales y demás
El foro de la comunidad Microsoft, podría así ser más completo aún de lo que es y para este foro en particular, nunca se es suficientemente completo, ya que debiera tomarse como referencia, sobre todo por la excelente formación de los colaboradores que ayudan aquí.

Answer 4

De paso, y viendo que aún no está marcado como solucionado, te pongo un código de ejemplo, espero que te sirva. Creo que debieras hacer algo así:


Private Sub bAExcel_Click()
dim excel1 as variant, contenido as string, cifra as long
set excel1 = createobject("excel.application")

contenido = texto1.txt
cifra = Val(texto2.txt)
'1º Agregás un nuevo libro
excel1.workbooks.add
'Así elegirías un rango de celdas(en caso que el contenido de la caja de texto no quepa en una sola celda)
excel1.range("A2:A5").Select
'Una vez elegido el rango, ahora trabajas con la selección
With excel1.Selection
  .merge
  .formula=contenido
  'si quieres cambiarle la fuente, por ejemplo
  .font.size = 15
End With
'En caso que estés tratando con números
excel1.range("B2:B5").Select
With excel1.Selection
  .merge
  .formula=cifra
  .font.size = 15
End With
set apexcel = nothing

'Por último, si es lo que quieres, muestras excel
apexcel.visible = true

End Sub

Answer 5

mira aqui esta la respuesta que buscas:

https://social.msdn.microsoft.com/Forums/es-ES/5b3f3139-d2cd-4ff4-aa37-70016bda083d/exportar-datos-de-vb6-a-excel?forum=vb56es