Excel VBA在运行后强制选择对象

Question

我已经研究到死了，感觉我是唯一一个遇到过这种情况的人。

我有一些 VBA：

• 将 3 张纸的副本创建到新的 wb
• 在新的 wb 中转换为值，删除对象（形状和控件）以及除 3 个范围之外的所有范围
• 打开现有的第三个文件并设置其中三个范围的内容以匹配新的 wb
• 关闭现有文件（已保存）
• 关闭新的 wb（已保存）
• 给出一个提示完成的消息框

最后，窗口的状态发生了一些奇怪的事情。所选单元格未显示为选中状态。如果我之后尝试单击一个控件，它会选择对象（因此用户可以拖动它们）。不应该，这是个大问题。

我尝试通过代码选择一个单元格，但它会引发错误。通过使用Call CommandBars("Drawing").Controls("Select Objects").Execute 强制关闭绘图模式并激活特定工作表并选择一个单元格，我的成功有限。但是，即使之后我什至单击了几个单元格，下次我选择一个控件时，它也会将其选择为对象，而不是单击该事物。

我不知道为什么，也找不到以前见过这个的人。

关于我能做什么的任何想法？

谢谢，

罗勒

Answer 1

我没有完全弄清楚，但我确实找到了解决办法。希望它适用于发现此问题的其他人。

在代码的最后我添加了这个： ActiveSheet.Shapes.Range("ctrlExportPrices").Select ActiveSheet.Range("B8").Select

所以它强制选择工作表上的一个控件，然后是一个单元格。

下次我手动选择控件时，它会单击它而不是选择绘图对象。