WITH This.oWord *** Now replace all the bookmarks in the template. Since we have set this up to have *** the template names match the bookmark names, just loop though the bookmarks collection *** and replace with the variable of the same name. FOR EACH loBookMark IN .ActiveDocument.Bookmarks lcVarName = loBookMark.Name loBookMark.Range.Text = EVALUATE( ALLTRIM(lcVarName) ) ENDFOR ENDWITH