As a module with Public Function called in either a macro or another block of code the highlighted line comes up bit it works perfectly from behind a label.

Object required and Error 424

Dim Word_Obj As Object
Forms![Form1]!MyOle.Verb = -2
Forms![Form1]!MyOle.Action = 7
Set Word_Obj = MyOle.Object.Application.WordBasic
Word_Obj.ViewNormal

Word_Obj.FileSaveAs ("c:\Letters\BD.doc")
Call QW

Set Word_Obj = MyOle.Object.Application.WordBasic

Replace it with

Set Word_Obj = Forms![Form1]!MyOle.Object.Application.WordBasic

Set Word_Obj = MyOle.Object.Application.WordBasic

Replace it with

Set Word_Obj = Forms![Form1]!MyOle.Object.Application.WordBasic

Many thanks. Worked like a charm.