Help for this page

Select Code to Download


  1. or download this
    Selection.Find.ClearFormatting
With Selection.Find
...
Selection.Find.Execute
Selection.MoveRight Unit:=wdCharacter, Count:=1
Application.Run MacroName:="Normal.NewMacros.insertsymbol"
  2. or download this
    use strict;
use Win32::OLE;
...
# close word file
$doc-> Close();
$word-> Quit();