Cita:
Iniciado por uzziber 
Bienvenid@ Turbovba:
No soy muy ducho en ésto de las macros; pero me parece que la Propiedad Saved no aplica a un objeto Excel.Application; la propiedad Saved se usa para objetos Excel.Workbook...
Revísalo y ya dirás sí estoy en lo correcto.
Saludos...
Gracias, Uzziber por tomarte el tiempo de responderme.
Sí tienes razón, ocurre que me expliqué mal, aunque mi código y sus respectivas referencias a propiedades de objetos está bien. A veces me confunde un poco una instrucción como esta:
xlappCertificaGeneral.Workbooks(NombreLibroCertAct ual).Saved = True
En esta instrucción puedes ver que tienes completamente toda la razón, pues la propiedad SAVED pertenece al objeto WORKBOOK y no al objeto EXCEL.APPLICATION representado en mi código por la variable
xlappCertificaGeneral.
La verdad estoy trabajando tanto con VBA como con VB 6.0. Pero, el inconveniente no me surge con VBA. Más bien viene de mi código en VB 6.0, pues, estoy accediendo a Excel como componente ActiveX desde mi aplicación hecha en Visual Basic 6.0. A continuación te copio una secuencia de código que me permite trabajar con Excel desde VB 6.0:
Dim xlappCertificaGeneral As Excel.Application
.
.
.
' Creación del objeto
Set xlappCertificaGeneral = CreateObject("Excel.Application")
' Apertura del libro (objeto Workbook)
xlappCertificaGeneral.Workbooks.Open StrRutaCertificaGeneral, , True, , "", ""
. ' Instrucciones de lectura sobre el libro abierto
. ' Instrucciones de lectura sobre el libro abierto
. ' Instrucciones de lectura sobre el libro abierto
' Obtención del nombre del libro que pretendemos cerrar
NombreLibroCertActual = ObtenerNombreLibro(StrRutaCertificaGeneral)
' Cambio del valor de la propiedad SAVED del libro
xlappCertificaGeneral.Workbooks(NombreLibroCertAct ual).Saved = True
' Cierre del libro
xlappCertificaGeneral.Workbooks(NombreLibroCertAct ual).Close
xlappCertificaGeneral.Quit ' Cierra la aplicacion de Excel
' Borrar la variable de objeto, liberándola de la memoria
Set xlappCertificaGeneral = Nothing
Gracias nuevamente y espero en esta oportunidad haberme explicado mejor.