我在Word中有一个宏选择一堆文本框并将它们缩小到其原始大小的1%,以便有效地隐藏它们。然后另一个宏展开他们自己的100倍大小,以重新显示它们。 的2码为: Sub ShrinkBox()
ActiveDocument.Shapes.Range(Array("Rectangle à coins arrondis 5", "Rectangle à coins arrondis 6")).S
我需要MS Word 2013的VBA宏来将嵌入式PDF附件保存在Word文件中的文件夹中。 我在Excel中找到了一个可以在Excel文档中保存嵌入文件的工作解决方案,我已经对Word VBA中的工作进行了一些修改,但是它没有任何创意使它在Word中工作? Private Declare PtrSafe Function CloseClipboard Lib "user32"() As Long
如何在文档的每个单词的左侧放置一个数字,每个数字都是随机着色的? 我设法使用下面的代码编号的每个字: Sub IndividualMacros()
Dim i&, w As Range
For Each w In ActiveDocument.Words
If w.Text Like "*[A-Z,a-z]*" Then
i = i + 1