これにより、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
しかし、この2つを次のように組み合わせると:
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 の手順が完了するのを待っていないのではないかと思いますが、その理由はわかりません。