我需要删除活动文档中的所有内容控制器(Loked and unlocked)而不删除任何文本。我搜索并找到了一个宏。但我认为它不能正常工作。
Word VBA to delete Content Controls with specific Tags
是否可以这样做?
编辑: 我试过下面的代码。它将删除包含文本内容的内容控制器。我只需要删除内容控制器。
Sub Test()
Dim objCC As ContentControl
Do While ActiveDocument.ContentControls.Count > 0
For Each objCC In ActiveDocument.ContentControls
objCC.Delete True
Next
Loop
End Sub
答案 0 :(得分:1)
我以自己的方式找到答案:)
<h:form id="f1" prependId="false" onsubmit="document.getElementById('f1').action='j_security_check';">
<p:growl id="growl" showDetail="true" sticky="true" />
...
</h:form>
这对某人有帮助。
答案 1 :(得分:1)
感谢您的回答 - 这正是我所寻求的。我最终使用了以下内容:
Sub ContentControlRemoval()
'
'Remove all content controls
Set oRng = ActiveDocument.Content
LTCC = LTCC + oRng.ContentControls.Count
For LC = oRng.ContentControls.Count To 1 Step -1
Set CC = oRng.ContentControls(LC)
If CC.LockContentControl = True Then
CC.LockContentControl = False
End If
CC.Delete
If Not LE Then
LRCC = LRCC + 1
End If
LE = False
Next
End Sub
答案 2 :(得分:1)
我能够删除没有任何宏的所有内容控件(在Word 2013中),如下所示:
我不知道它是否适用于所有类型的内容控件。