none
Visual Basic 6.0 &Excel RRS feed

  • Pregunta

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

    • Cambiado Enrique M. Montejo domingo, 4 de febrero de 2018 7:43 Programación con Visual Basic 6.0
    martes, 4 de septiembre de 2007 21:57

Respuestas

Todas las respuestas

  • 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

    miércoles, 5 de septiembre de 2007 6:29
  • 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!

     

    miércoles, 5 de septiembre de 2007 6:32
    Moderador
  • 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í.
    miércoles, 16 de enero de 2008 15:31
  • 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
    viernes, 18 de enero de 2008 13:43
  • 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


    domingo, 4 de febrero de 2018 3:32