操纵Word文档

Question

我们有一大堆的Microsoft Word文档在某些领域有一个“标题2”。有没有通过VBA或.NET代码的任何方式，我们可以打开这个文件，找出了“标题2”地区，并自动将其更改为“标题3”？这是非常耗时的手动执行此操作和编程解决方案，将是很好的。

Answer 1

Selection.Find.ClearFormatting 

    Selection.Find.Style = ActiveDocument.Styles("YourOldStyle") 
    Selection.Find.Replacement.ClearFormatting 
    Selection.Find.Replacement.Style = ActiveDocument.Styles("YourNewStyle") 

    With Selection.Find 

     .Text = "" 
     .Replacement.Text = "" 
     .Forward = True 

     .Wrap = wdFindContinue 
     .Format = True 
     .MatchCase = False 

     .MatchWholeWord = False 
     .MatchWildcards = False 
     .MatchSoundsLike = False 
     .MatchAllWordForms = False 

    End With 

    Selection.Find.Execute Replace:=wdReplaceAll