excel - 如何通过 VBA 代码修复仅在 Excel 的共享模式下发生的运行时错误 400

Question

我真的不知道是什么导致了错误 400。
下面的代码在正常模式下运行得非常好，但是一旦我在共享模式下启用我的 excel 并尝试使用用户表单，它就会给我 VBA 400。

我在这里尝试做的是更改形状的文本并禁用其 OnAction 事件，一旦用户表单显示给用户。这样访问同一文件的另一个用户就会知道有人正在使用“用户表单”输入数据。

Dim shp As Shape
For Each shp In ActiveSheet.Shapes
    If shp.TextEffect.Text = "Sort Customer" Then
        shp.OnAction = ""
        shp.TextEffect.Text = "Wait!!!"
    End If
Next

问:有没有办法自动发布任何用户在共享 Excel 中所做的更改。

Answer 1

我怀疑您的代码属于 Excel 共享模式的众多限制之一，如 here 所述(请参阅不支持的功能)，包括

Using a data form to add new data
Using drawing tools
Inserting or changing pictures or other objects

(请注意，由于它的格式，我无法在我的答案中轻松复制不支持的功能列表。)