excel - 在excel中锁定形状文本

Question

我正在尝试使用 VBA 锁定形状及其文本，但没有成功。

我尝试了以下

    Shape.locked = True
    Shape.Text.locked = True

Selection.Locked = True 'working
Selection.Characters.Text.Locked = True  'not working

谢谢

标签： excelvba

Answer 1

要设置lockedTexta 的属性Shape，可以使用（隐藏的）属性 object DrawingObject。假设您的变量shape设置为您选择的 Shape 对象，请尝试

shape.DrawingObject.LockedText = true

您还可以使用DrawingObject来设置locked-property，看起来shape.Locked和shape.DrawingObject.Locked引用相同的值。

不幸的是，DrawingObject没有记录，因此不能保证 Microsoft 将在所有（未来）Excel 版本中支持此功能。