这会将 Microsoft Word 2013 切换到主页选项卡:
Sub HomeTab()
Application.ScreenUpdating = False
SendKeys "%h%"
ScreenUpdating = True
End Sub
这将打开一个文档:
Sub OpenToDoLIst()
Documents.Open FileName:="C:\Users\Name\Name Documents\Microsoft Word Documents\Work Menu\To Do List.doc"
End Sub
但是,如果我像这样将两者结合起来:
Sub WorkOpenToDoList()
Application.ScreenUpdating = False
SendKeys "%h%"
ScreenUpdating = True
Documents.Open FileName:="C:\Users\Name\Name Documents\Microsoft Word Documents\Work Menu\To Do List.doc"
End Sub
它不会将我激活宏时开始的原始文档切换到主页选项卡,它只会打开文档。我怀疑它没有等待 HomeTab 步骤在原始窗口中完成,但我不知道为什么。