![]() Loading |
VBScript |
JavaScript |
Powershell |
Search Options: Boldface a Specific Word Throughout a Microsoft Word Document
|
||
Const wdReplaceAll = 2
Set objWord = CreateObject("Word.Application") objWord.Visible = True Set objDoc = objWord.Documents.Open("C:\Scripts\Test.doc") Set objSelection = objWord.Selection objSelection.Find.Text = "Fabrikam" objSelection.Find.Forward = TRUE objSelection.Find.MatchWholeWord = TRUE objSelection.Find.Replacement.Font.Bold = True objSelection.Find.Execute ,,,,,,,,,,wdReplaceAll | ||
© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at :: |