Estoy intentando crear una macro para abrir y cambiar el tamaño de los paneles de estilos de navegación automáticamente al abrir (globalmente). Puedo hacerlo funcionar, excepto cambiar el tamaño del panel de estilos. Desafortunadamente, copiar el código que cambia el tamaño del panel de navegación al panel de estilo no funciona :( Puedes ver la sección que destaca y el mensaje de error aquí. ¿Alguien puede ayudarme a corregirlo?
Sub AutoOpen()
Call PaneFixNav
Call PaneFixStyle
End Sub
Sub PaneFixNav()
Application.CommandBars("Navigation").Visible = True
Dim iWidth As Integer
iWidth = 250
With CommandBars("Navigation")
.Width = iWidth
End With
End Sub
Sub PaneFixStyle()
Application.TaskPanes(wdTaskPaneFormatting).Visible = True
Dim iWidth As Integer
iWidth = 250
With Application.TaskPanes(wdTaskPaneFormatting)
.Width = iWidth
End With
End Sub
PD. Básicamente no tengo experiencia con macros además de esta, que compilé a partir de diferentes publicaciones. Entonces, perdón por lo que podría ser una pregunta tonta.
Respuesta1
Desafortunadamente, los paneles de tareas integrados acoplables de Microsoft Word no se pueden cambiar de tamaño mediante programación.
Con VBA, solo se puede cambiar el tamaño de los formularios de usuario (diálogos) modales y no modales personalizados en tiempo de ejecución.