是否可以从vba更改MS Project选项菜单中的设置？如果是这样，怎么样？

Question

我特别想改变：

文件>选项>计划>为这个项目调度选项>拆分正在进行的任务

我写这改变了“停止”字段宏，但如果这框未被选中，那么“停止”字段将变为只读。

我还没有找到任何人在其他论坛尝试这个例子。

我在2010年项目

Answer 1

在搜索中有点持久性，我找到了答案。它实际上在Project 2013中的对象浏览器中，但我没有在MSDN上的Project Model中看到它。

所以，这里是一个简单的切换宏的原始问题和我的问题（但同样的解决方案）。

我知道有一种方法可以更简洁地编写切换，但除了我记不起的事实之外，这也显示了更好的逻辑。

希望这会有所帮助！

Nic。

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 

Answer 2

工作，我一直在寻找一些非常相似，但可悲的是，我还没有找到一种方法，以及跨越这个线程来同时使用Google的答案，我不能回答。

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

所以......这只是一个小小的尝试来打破这个问题。

Nic。

MS Project 2013 Professional