Buenas tardes. Es raro que no puedas abrirlo. Debes tener algún problema con la configuración del Excel o te estas equivocando en la típica chorrada que tienes delante de las narices y no ves.
Mientras que lo encuentras, te adjunto el código fuente de los tres componentes del libro. Por que supongo que por lo menos te saldrán los tres. Es el código de, respectivamente, la hoja, el libro y un formulario de usuario que utiliza el compañero para filtrar los datos a mostrar. Espero que por lo menos el código fuente te pueda ayudar, aunque no lo puedas ejecutar. Y haz que te revisen el Excel. Por mi experiencia reinstalar no siempre funciona. Busca en google el error a ver si encuentras como solucionarlo. Gustavo Adolfo Márquez Álvarez. Departamento de Informática. [email protected] inforZitro, S. L. Carretera de Níjar, nº 404. 04007 Almería (España). Teléfono: 950 226 658. Extensión: 148. Fax: 950 223 620. -----Mensaje original----- De: [email protected] [mailto:[email protected]] En nombre de Javier Mora Enviado el: martes, 17 de marzo de 2009 15:53 Para: forum.help400 Asunto: RE: Acceso al iSeries desde Excel+VBA Hola Hector: Tengo habilitada la posibilidad de ejecutar macros y no me pide contraseña. Además, me deja abrir el proyecto donde está el código VB, pero no me visualiza nada. Cuando intento pinchar en formularios o objetos me aparece el mensaje ya indicado. _____ De: [email protected] [mailto:[email protected]] En nombre de Hector Vera G. Enviado el: martes, 17 de marzo de 2009 14:46 Para: forum.help400 Asunto: RE: Acceso al iSeries desde Excel+VBA Javier, Excel tiene un nivel de seguridad para poder ejecutar macros y código en V.B. Revisa si tienes configurado Excel para poder ejecutar macros. si el proyecto esta protegido la clave es: hevego Saludos, Hector De: [email protected] [mailto:[email protected]] En nombre de Javier Mora Enviado el: Martes, 17 de Marzo de 2009 06:51 a.m. Para: forum.help400 Asunto: RE: Acceso al iSeries desde Excel+VBA Hola Hector: Estoy intentando revisar y probar el ejemplo que enviaste. Al intentar abrir el proyecto para ver el código VB me aparece el error "El proyecto no se puede mostrar". Desconozco cual es la razón. ¿Es posible que falte algo en el proyecto? Estoy interesado en probar lo que me envías. Un saludo. Javier Mora _____ De: [email protected] [mailto:[email protected]] En nombre de Hector Vera G. Enviado el: jueves, 12 de marzo de 2009 17:22 Para: forum.help400 Asunto: RE: Acceso al iSeries desde Excel+VBA Javier, aquí te paso un Excel que usa un query para accesar tablas del Iseries, lo hace via ODBC por lo tanto tendras que configurar un acceso para conectar Excel y el Iseries. Para ver la lógica usada entras al Excel y le das alt +F11 y veras el código que me sirve para hacer un join y mostrar el resultado en Excel. Si tienes tienes alguna duda, aquí me encuentras. Saludos, Hector De: [email protected] [mailto:[email protected]] En nombre de Javier Mora Enviado el: Jueves, 12 de Marzo de 2009 10:04 a.m. Para: forum.help400 Asunto: RE: Acceso al iSeries desde Excel+VBA Hola Martín: Es posible que no me explicara bien en mi correo inicial. NO TENGO NI IDEA DE VISUAL BASIC NI .NET. ;-) Detallo un poco más mi problema. Necesito programar una macro en Excel que acceda a uno o varios ficheros del iSeries para extraer información (p.e. con SQL) y, además, necesito ejecutar un mandato. Si no me equivoco, las macros de Excel se programan en Visual Basic o en VBA (creo que es casi lo mismo) y que al iSeries se puede acceder usando ADO (posiblemente no necesite ADO.NET). Excel ya lleva integrado un editor para el código. No tengo muchos conocimientos sobre este tema y solo quiero o un pequeño ejemplo que me pueda servir de guía o algún enlace a algún recurso que me pueda ayudar a desarrollar lo que quiero. Cualquier ayuda será bienvenida. Javier Mora _____ De: [email protected] [mailto:[email protected]] En nombre de [email protected] Enviado el: jueves, 12 de marzo de 2009 13:54 Para: forum.help400 Asunto: Re: Acceso al iSeries desde Excel+VBA Hola Javier, tu pregunta tiene algún matiz, me explico: Desde Visual Basic a pelo (versión 5 o 6) el acceso a DB2 es muy fácil, tienes un asistente que te lleva de la mano para acceso a datos, ejecutar programas, etc. Pero ya sabes que para Microsoft ahora es todo .NET Yo creo a partir de la 5.2 de Client Access ya usa OLEDB, lo que quiere decir que tendrás un buen rendimiento. Pero si estas hablando de .NET la cosa cambia, te pongo un enlace a un documento en mi blog con una pequeña guia relacionada con tu pregunta. Tengo algún cliente que controla un montón de estas cosas, igual me puede hacer algún ejemplo para "Torpes". En mi caso hace años que no enredo con estas cosas, pero lo básico desde Visual si lo se, si necesitas algo ya sabes donde encontrame. Un saludo Martín <http://www.sidra400.com/sidra400.nsf/dx/ADO-NET?opendocument&comments#anc1> El enlace From: "Javier Mora" <[email protected]> To: "forum.help400" <[email protected]> Date: 12/03/2009 13:32 Subject: Acceso al iSeries desde Excel+VBA Sent by: [email protected] _____ Estimados colegas: Me ha surgido la necesidad de obtener una serie de datos del iSeries y la de ejecutar un programa(s) desde una hoja de cálculo. Sé que se puede programar en Visual Basic (VBA) en Excel y se puede acceder al iSeries con ADO, pero soy un TOTAL DESCONOCEDOR de este entorno. ¿Tenéis algún ejemplo cortito de estos dos casos? ¿Conocéis algún recurso (libro, tutorial, guía, etc.) que me pueda servir de introducción? Un saludo. Javier Mora García __________________________________________________ Forum.HELP400 es un servicio m&#225;s de ServerNEWS. &#169; Publicaciones Help400, S.L. - Todos los derechos reservados <http://www.help400.es/> http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: <http://listas.combios.es/mailman/listinfo/forum.help400> http://listas.combios.es/mailman/listinfo/forum.help400 _____ Este mensaje se transmite exclusivamente para el uso del destinatario previsto y puede contener información que es PRIVILEGIADA y/o CONFIDENCIAL. Dicha información no expresa la posición de la compañía. Si usted no es el destinatario previsto, se le notifica por este medio, que cualquier uso, difusión, acceso o copia de esta comunicación está prohibida terminantemente. Si usted ha recibido esta comunicación por error, destruya por favor todas las copias de este mensaje y sus adjuntos y notifíquenos inmediatamente. This message is sent exclusively for the use of the intended recipient and may contain information that is PRIVILEGED and/or CONFIDENTIAL. This information do not express the position of the company. If you are not the intended recipient, you are hereby notified that any use, dissemination, disclosure or copying of this communication is strictly prohibited. If you have received this communication by mistake, please destroy all copies of this message and its attachments and notify us immediately "Bienvenido a la Vida, Bienvenido a InVita" _____ Este mensaje se transmite exclusivamente para el uso del destinatario previsto y puede contener información que es PRIVILEGIADA y/o CONFIDENCIAL. Dicha información no expresa la posición de la compañía. Si usted no es el destinatario previsto, se le notifica por este medio, que cualquier uso, difusión, acceso o copia de esta comunicación está prohibida terminantemente. Si usted ha recibido esta comunicación por error, destruya por favor todas las copias de este mensaje y sus adjuntos y notifíquenos inmediatamente. This message is sent exclusively for the use of the intended recipient and may contain information that is PRIVILEGED and/or CONFIDENTIAL. This information do not express the position of the company. If you are not the intended recipient, you are hereby notified that any use, dissemination, disclosure or copying of this communication is strictly prohibited. If you have received this communication by mistake, please destroy all copies of this message and its attachments and notify us immediately "Bienvenido a la Vida, Bienvenido a InVita"
Hoja1.cls
Description: Binary data
ThisWorkbook.cls
Description: Binary data
UserForm1.frm
Description: Binary data
__________________________________________________ Forum.HELP400 es un servicio m&#225;s de ServerNEWS. &#169; Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: http://listas.combios.es/mailman/listinfo/forum.help400

