2017-08-11 27 views
0

我已经创建了一个表单,用户可以选择重置(清除)表单。我能够清除窗体中的所有内容(文本框,组合框的&复选框),但不知道如何在没有删除整个选项的情况下插入图片来清除图片。我试过使用书签方法,但是没有成功。书签被选中然后删除。这导致代码不承认Inlineshape(因此 - 运行时错误“5941‘集合中的请求的成员不存在’如何清除ms单词中的宏的图片内容控件

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

enter image description here

回答

1

您的代码并没有提及的内容控件然而

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

其中“图片1”是图片内容控件的标题,应该做的伎俩。