我正在Excel中创建MIS(管理信息系统),并且需要使用“假设分析”。
我正在将各种方案添加到方案管理器中,并且为了使其更加用户友好,我正在全屏显示整个系统。但是,这意味着用户将无法打开方案管理器。
我不能简单地将每个方案分配给按钮/下拉列表,因为用户需要具有编辑每个方案的能力。因此,这意味着我需要对VBA宏进行编程以启动方案管理器。
但是,这带来了一个问题:似乎无法使用VBA启动方案管理器!
我尝试搜索它,但是访问过的所有页面都包含用于启动具有以下各项的单个方案的代码:
ActiveSheet.Scenarios("[scenario name here]").Show
但是似乎没有什么可以启动实际的方案管理器:
我也尝试记录宏来执行此操作,但是宏本身为空:
Sub whatIfManager()
'
' whatIfManager Macro
'
' Keyboard Shortcut: Ctrl+Shift+W
'
End Sub
我尝试ActiveSheet.Scenarios().Show
了一些可行的替代方法,但是没有(没有使用该名称的方法)。
是否可以使用VBA启动假设情景管理器?如果是这样,怎么办?
您要查找的方法位于Application
对象中,特别是Application.Dialogs
。这样的事情会做到这一点:
Application.Dialogs(xlDialogScenarioCells).Show
枚举值确定要显示的对话框。对话框的完整列表在此处。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句