Programación General > Visual Basic 6.0 e inferiores
Exportar Un Informe A Un Documento De Excel En Vb!
Mydr:
Hola a todos!
Tengo un pequeño problemita, necesito generar unos informes de entradas y salidas de un almacén, pero estos informes ya tienen su formato prediseñado en Excel, pero no tengo ni idea como se haga esto, necesito que los datos se inserten en celdas concretas, dentro del formato, espero me puedan ayudar, de antemano se los agradezco.
Adjunto el archivo de Excel (ZIP).
toten:
amigo yo ahorita paso informacion a un archivo de excel en una apliacion que estoy haciendo que no te puedo pasar esos code porque son de una institucion pero si te voy a mandar en u8n rato yun link con toda la info men
toten:
pero me tienes que recordar por aqui ´porque sino se me olvida ok men
:whistling:
Widark:
Que tal Mydr!
Puedes crear una plantilla en Excel con el formato que adjuntaste, cierta vez hize una pregunta parecida pero en Word, Shiquilla respondio y su ejemplo fue como anillo al dedo (como todas las respuestas que he recibido de todos lo foreros), debes comprobar si el archivo existe:
--- Código: Text --- Path = App.Path & "\Informes\" Rem Por decir algo Archivo = "Plantilla03.dot" Rem Extencion de la plantilla de excel, esta es Word Existe = Dir(Path & Archivo) If Trim(Existe) <> "" Then Set ExcelExp = CreateObject("EXCEL.APPLICATION") With ExcelExp .Workbooks.Add .Sheets(1).Select NumerodeCelda = 17 Rem Debido a que ahi empieza tu informe .Range("AB" & NumerodeCelda).Font.Name = "Tahoma" Rem si quieres saber más metodos y propiedades puedes abrir Excel y en el editor de macros las intentas .Range("CD" & NumerodeCelda).Value= VariabledelaCantidad End With End if No olvides validar hasta la celda 41 a menos que puedas cambiar el tamaño insertando mas filas, debes hacer referencia a excel en vb, creo que eso es todo cualquier cosa me la comentas.
Saludos.
toten:
ves no mev acordaste y se me olvido mandarte esto bueno aqui te mando la ´pagina donde vas a conseguir toda la info que quieres super bien explicada.. cuidate y no seas tan flojo...
:angry:
:comp:
http://msdn.microsoft.com/library/spa/defa...veworkbooks.asp
http://msdn.microsoft.com/library/spa/default.asp?url=/library/SPA/dv_wrcore/html/wrtskhowtosaveworkbooks.asp
Navegación
[#] Página Siguiente
Ir a la versión completa