vba - 应用程序关闭时存储从 Excel 2010 宏生成的变量/对象

Question

我创建了一个启用宏的工作簿来进行一些容量建模。我捕获最终用户的假设和参数，然后将它们传递给几个函数。这会生成预计时间表的图表和表格，以提供特定时间范围内的容量。在宏中，我正在创建诸如“项目”或“阶段”或“单元”之类的对象，它们是类模块。其中一些是其他对象的集合。我正在尝试存储这些对象，以便在重新打开工作簿时程序不必每次都重新创建它们。我能想到的最简单的解决方案是将所有内容打印到一个隐藏的工作簿中，Workbook_BeforeClose()然后在Workbook_Open(). 不知道有没有更好的解决办法。

Answer 1

隐藏的工作簿应该没问题 - 我会将其设置xlVeryHidden为阻止（大多数）用户查找数据表。

如果工作簿特定于特定用户，而不是电子表格，那么您可以使用注册表来存储/检索信息

x = GetSetting(appname := "MyApp", section := "Startup", key := "Left", default := "25")
'Shorter: x = GetSetting("MyApp","Startup", "Left", 25)
SaveSetting appname := "MyApp", section := "Startup", key := "Left", setting := 50 
'Shorter: SaveSetting "MyApp","Startup", "Left", 50 
DeleteSetting "MyApp", "Startup" , "Left"

还有GetAllSettings一个会将一个完整的部分加载到一个二维数组中，其中包含设置的名称(arraypos,0)和值(arraypos,1)