Error al ejecutar Application.windows ("archivo").visible = False
A tod@s
Estoy ejecutando la instrucción
Application.Windows("formulario").Visible = False
La cual me oculta el libro del archivo "Formulario" mientas ejecutó un userform.
Ahora, mi problema está cuando los usuarios que operan el archivo le cambian el nombre al archivo, porque este ya no ejecuta.
Trate guardando el nuevo nombre del archivo dentro de una variable.
Dim Nombredelarchivo
Nombredelarchivo = ActiveWorkbook.Name
Application.Windows(Nombredelarchivo).Visible = False
Pero me genera error como si no reconociera mi variable.
1 respuesta
Respuesta de Dante Amor
1
H o l a : ¿Qué error te envía? ¿Y en Qué línea se detiene la macro?
Si ocultaste el libro y haces referencia a ActiveWorkbook, te genera error porque el libro ya no está activo, entonces lo utilizas así:
Nombredelarchivo = ThisWorkbook.Name Application.Windows(Nombredelarchivo).Visible = True
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
