Esperar instruccion de abrir libro para continuar el codigo

[krisrodr15]

Buenas tardes,

tengo un codigo que me valida si un libro se encuentra abierto y en caso de no estarlo me arroja un mensaje de notificacion como este:

Sin permisos de acceso

lo que...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[KennethFCR]

Prueba con

Function IsWorkBookOpen(Name As String) As Boolean
    Dim xWb As Workbook
    On Error Resume Next
    Set xWb = Application.Workbooks.Item(Name)
    IsWorkBookOpen = (Not...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí