我正在尝试制作一个宏,在打开时自动打开并调整导航样式窗格的大小(全局)。我可以让它工作,除了调整样式窗格的大小。不幸的是,将调整导航窗格大小的代码复制到样式窗格不起作用 :( 您可以在此处查看其突出显示的部分和错误消息。有人能帮我改正一下吗?
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
附言:除了这个之外,我基本上没有使用宏的经验,这些经验都是我从不同的帖子中拼凑起来的。所以,抱歉,这个问题可能有点愚蠢。
答案1
不幸的是,Microsoft Word 内置的可停靠任务窗格无法通过编程调整大小。
使用 VBA,只有自定义模态和非模态用户表单(对话框)可以在运行时调整大小。