wordvba编程,wordvba编程教程
word如何使用vba
1、在Word中打开你需要处理的doc文档；
2、键入ALT+F11；
3、在出现的VBA窗口中，粘贴你下载的代码；
4、把键盘光标放到入口函数中任意一行代码上（如果你不知道是什么地方，可以把代码贴上来看看）；
5、键入F5运行；
6、切换回doc文档窗口看效果。
补充：
哦，可能是因为你目前还没有任何宏所以才看到这样的灰色一片。
那就这样，现在左边的工程里面有个“Normal”吧？展开它后有个“模块”节点吧？在这个“模块”节点上点鼠标右键，选择“插入-模块”。这样右边就会出现代码窗口了。然后再按照上面步骤3-6。
如果还不清楚可以继续补充提问或发我信息。
word中搞vba编程似乎没什么用处是吧
VBA是宏的指令集，可替代人工做一些复杂、重复的操作。
比如有一个文件夹内有数百份员工简历
的WORD文档，你要逐一打印出来。如果你会VBA，你可写一程序帮你完成。
Word文档VBA编程之Sections/Section对象用法
以下内容与Word文档VBA编程的Sections或Section对象有关，希望对您有所帮助。
ActiveDocument.Sections.First
'当前文档的第一节
ActiveDocument.Sections.First.PageSetup.BottomMargin
'当前文档第一节所在页的底边距
ActiveDocument.Sections.First.PageSetup.LeftMargin
'当前文档第一节所在页的左边距
ActiveDocument.Sections.First.PageSetup.RightMargin
'当前文档第一节所在页的右边距
ActiveDocument.Sections.First.PageSetup.TopMargin
'当前文档第一节所在页的顶边距
ActiveDocument.Sections.First.PageSetup.PaperSize
'返回或设置当前文档第一节所在页的大小
ActiveDocument.Sections.First.PageSetup.PageHeight
'返回或设置当前文档第一节所在页的高度
ActiveDocument.Sections.First.PageSetup.PageWidth
'返回或设置当前文档第一节所在页的宽度
ActiveDocument.Sections.Add
Range:=myRange
'在当前文档中添加新节
ActiveDocument.Sections.Item(2)
'当前文档中的第二节
ActiveDocument.Sections.Last.Range.InsertAfter
"文档结束!"
'在当前文档中最后一节的结尾添加文字“文档结束!”
以上内容与具备一定VBA知识的网友使用。
word如何用vba编程将重复同一内容替换为不同内容？
Sub 替换()
On Error GoTo xxx:
Dim Rng As Range, n, arr, a$
a = ActiveDocument.Content.Text
Set Rng = ActiveDocument.Content
With Rng.Find
.ClearFormatting
.Replacement.ClearFormatting
arr = Array("白日依山尽", "黄河入海流", "欲穷千里目", "更上一层楼")
Do While .Execute(findtext:="白日依山尽")
Rng = arr(n)
Rng.SetRange Rng.End, ActiveDocument.Content.End
n = n + 1
Loop
End With
GoTo yyy:
xxx:
MsgBox "文档中词条“白日依山尽”数目超出4个！"
yyy:
MsgBox "转换完成！"
End Sub