Checking upon saving fo text highlighting

[John Doue]

I need to check upon saving for the presence of any highlighting in the
document. Any help would be welcome.

Thanks

 

[Dave Lett]

Intercept the Save event (see "Intercepting events like Save and Print" at
http://word.mvps.org/FAQs/General/index.htm)
In your event(s) you could include something like the following:


With Selection
.HomeKey Unit:=wdStory
With .Find
.ClearFormatting
.Text = ""
.Highlight = True
If .Execute Then
MsgBox "This document has highlighting."
Exit Sub
End If
End With
End With

''' save procedures

HTH,
Dave

 

[John Doue]

Intercept the Save event (see "Intercepting events like Save and Print" at
http://word.mvps.org/FAQs/General/index.htm)
In your event(s) you could include something like the following:


With Selection
.HomeKey Unit:=wdStory
With .Find
.ClearFormatting
.Text = ""
.Highlight = True
If .Execute Then
MsgBox "This document has highlighting."
Exit Sub
End If
End With
End With

''' save procedures

HTH,
Dave

Thanks a million, I'll go for it ...