If you save macros in a document then a user can re-enable them. The only
solution is to remove them. You can do this with the macro organizer, or you
could save as RTF which does not support macros eg
Dim sFname As String
With ActiveDocument
If .Path = "" Then
.Save
End If
sFname = .FullName
sFname = Left(sFname, Len(sFname) - 3)
MsgBox sFname
.SaveAs FileName:=sFname & "RTF", _
FileFormat:=wdFormatRTF
.Close
End With
Documents.Open FileName:=sFname & "RTF"
ActiveDocument.SaveAs sFname & "doc", _
FileFormat:=wdFormatDocument

Signature
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
Word MVP web site http://word.mvps.org
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
> Hi,
>
[quoted text clipped - 4 lines]
>
> Thank you in advance
On reflection it might be better to change
If .Path = "" Then
.Save
End If
to simply
.Save

Signature
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
Word MVP web site http://word.mvps.org
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
> Hi,
>
[quoted text clipped - 4 lines]
>
> Thank you in advance