A family of Microsoft word processing software products for creating web, email, and print documents.
Further to Jay's response, if you insert a { Docvariable Order } in place of the bookmark and then replace
ActiveDocument.Bookmarks("Order").Range.InsertBefore Format(Order, "00#")
ActiveDocument.SaveAs FileName:="S:\DBS\ACSkyways work order\work order" & Format(Order, "00#")
by
With ActiveDocument
.Variables("Order").Value = Format(Order, "00#")
.PrintPreview
.ClosePrintPreview .SaveAs FileName:="S:\DBS\ACSkyways work order\work order" & Format(Order, "00#")
End With
you can then apply the protection to the template itself, rather than using code to do it.