重命名工作表ActiveX ComboBox后需重启工作簿的原因与解决办法

问题原因 #

这是Excel对象模型的缓存机制导致的：修改OLEObject的Name属性时，Excel仅更新了控件的前端显示名称，但后端OLEObjects集合的索引和属性缓存并未即时刷新，必须重新加载工作簿才能让缓存完全同步。

解决办法 #

方法一：放弃旧引用，重新获取控件 #

修改名称后，不要再使用之前存入集合的旧对象引用，直接从工作表的OLEObjects集合重新获取控件，确保拿到的是更新后的属性：

' 示例：将OldCombo重命名为NewCombo
Sheet1.OLEObjects("OldCombo").Name = "NewCombo"
' 重新获取更新后的控件引用
Set updatedCombo = Sheet1.OLEObjects("NewCombo")

方法二：强制刷新对象模型缓存 #

通过切换工作表或触发重新计算，强制Excel刷新对象模型的缓存：

Sheet1.OLEObjects("OldCombo").Name = "NewCombo"
' 切换工作表触发刷新
Sheet2.Activate
Sheet1.Activate
' 或者执行强制重新计算
Sheet1.Calculate

方法三：通过Shapes集合修改名称 #

Shapes集合的属性更新更即时，先通过它修改名称，再转回OLEObject获取引用：

Sheet1.Shapes("OldCombo").Name = "NewCombo"
Set updatedCombo = Sheet1.OLEObjects("NewCombo")

内容的提问来源于stack exchange，提问作者Infrequent Coder