如何用ms中的宏清除图像内容控件

时间:2017-08-11 13:47:03

标签: vba word-vba

我创建了一个表单,用户可以选择重置(清除)表单。我能够从表单(文本框,组合框和复选框)中清除所有内容,但不确定如果插入图片而不删除整个选项,如何清除图片。我尝试使用书签方法,但没有成功。选择书签然后删除。这导致代码无法识别Inlineshape(因此 - 运行时错误'5941“该集合的请求成员不存在”。

ActiveDocument.Bookmarks("picture").Select
Selection.InlineShapes(1).Delete
Selection.InsertAfter ""

enter image description here

1 个答案:

答案 0 :(得分:1)

您的代码未提及内容控件,但

Dim oCC As ContentControl
Set oCC = ActiveDocument.SelectContentControlsByTitle("Picture1").Item(1)
If oCC.Range.InlineShapes.Count > 0 Then oCC.Range.InlineShapes(1).Delete

其中' Picture1'是图片内容控件的标题,应该做的伎俩。