• Sábado 21 de Diciembre de 2024, 10:57

Autor Tema:  REPORTES EN VISUAL BASIC  (Leído 3445 veces)

angel_pentium

  • Nuevo Miembro
  • *
  • Mensajes: 6
    • Ver Perfil
REPORTES EN VISUAL BASIC
« en: Sábado 28 de Marzo de 2009, 20:49 »
0
Hola que tal
Oigan necesito un tutorial o algo que me indique paso por paso, como hacer un reporte
Veran. llevo los registros de los reportes en una hoja de visual basic enlazada a una base de datos de access. Sin embargo ahora quiero una hoja (un documento como de word) que me despliegue los datos por columnas. Para poder ver y cotejar los datos con facilidad. Me seria muy util.
Muchas gracias
Saludos a todos
Armandiux ;)

m0skit0

  • Miembro de PLATA
  • *****
  • Mensajes: 2337
  • Nacionalidad: ma
    • Ver Perfil
    • http://fr33kk0mpu73r.blogspot.com/
Re: REPORTES EN VISUAL BASIC
« Respuesta #1 en: Domingo 29 de Marzo de 2009, 12:29 »
0
Igual que haces el enlace con Access, hazlo con Excel

Salud

angel_pentium

  • Nuevo Miembro
  • *
  • Mensajes: 6
    • Ver Perfil
REPORTES EN VISUAL BASIC
« Respuesta #2 en: Miércoles 1 de Abril de 2009, 02:43 »
0
Aja...
Y eso como lo hago. Es decir, pongo un database y boton que diga "despliega esta tabla en excel y crea un listado bonito" y ya??? o como???...
que alguien me explique!!! pleaaase!!! :hitcomp:

Gracias
Saludos: Armandiux

m0skit0

  • Miembro de PLATA
  • *****
  • Mensajes: 2337
  • Nacionalidad: ma
    • Ver Perfil
    • http://fr33kk0mpu73r.blogspot.com/
Re: REPORTES EN VISUAL BASIC
« Respuesta #3 en: Miércoles 1 de Abril de 2009, 09:42 »
0
Podrías buscar en Google, porque es tu colega. Vaguete...  -_-

Primero hay que añadir la referencia al Excel en Proyecto->Referencias->Microsoft Excel x.x Object Library

Código: Visual Basic
  1. Dim Excel As Excel.Application
  2. Dim Excel_Libro As Excel.Workbook
  3. Dim Excel_Hoja As Excel.Worksheet
  4.  
  5. Set Excel = New Excel.Application
  6. Set Excel_Libro = Excel.Open(Ruta_Libro_Excel)
  7. Set Excel_Hoja = Excel.Libro.Worksheets(Indice_Numerico_O_Nombre_Hoja)
  8.