是否可以从vba更改MS Project options（MS项目选项）菜单中的设置？如果是，怎么做？

我特别想改变：

文件>选项>计划>此项目的计划选项>分割进行中任务

我编写了一个宏，它更改了“停止”字段，但如果未选中此框，则“停止”字段将变为只读

我还没有在其他论坛上发现有人尝试过这种方法

---

我在Project 2010工作

我一直在寻找类似的东西，但遗憾的是我无法回答，因为我也没有找到方法，在谷歌搜索答案时遇到了这个问题

我想切换一个非常接近您（！）的选项，即“自动链接插入或移动的任务”，我希望我可以在VBA中编写一些简单的内容，并在快速访问工具栏上有一个按钮

所以…这只是一个小小的尝试，来挑战这个问题

尼克

---

MS Project 2013 Professional

我坚持不懈地搜索，终于找到了答案。它实际上在Project 2013的对象浏览器中，但我在MSDN的项目模型中没有看到它

所以，这里有一个简单的切换宏，用于原始问题和我的问题（但实际上是相同的解决方案）

我知道有一种方法可以更简洁地编写切换，但除了我不记得如何编写外，这也更好地显示了逻辑

希望这有帮助

尼克

---

这不是一个很有帮助的答案。我知道你现在不能添加评论，只要耐心等待，直到你得到足够的分数。度假回来并有一个解决方案等着你真是太好了。谢谢

Sub ToggleAutoLink()

    Dim ap As Project
    Set ap = ActiveProject

    If ap.AutoLinkTasks = True Then
        ap.AutoLinkTasks = False
    Else
        ap.AutoLinkTasks = True
    End If

End Sub

---------------

Sub ToggleSplitInProgess()

    Dim ap As Project
    Set ap = ActiveProject

    If ap.AutoSplitTasks = True Then
        ap.AutoSplitTasks = False
    Else
        ap.AutoSplitTasks = True
    End If

End Sub