General discussion

Locked

Word 2002 - Selecting Text

By MedMan ·
Is there a simple way of selecting ALL text including the Header and Footer in one operation. Edit:Select All only selects text in the main body of the document.

Why do I want to do this? I wish to change the font in a large number of documentsall of which have Headers and Footers. Changing the font in the Normal Style does not help as they have all had the existing font changed once before by Direct Formatting.

This conversation is currently closed to new comments.

4 total posts (Page 1 of 1)  
| Thread display: Collapse - | Expand +

All Comments

Collapse -

Word 2002 - Selecting Text

by MedMan In reply to Word 2002 - Selecting Tex ...

Point value changed by question poster.

Collapse -

Word 2002 - Selecting Text

by DKlippert In reply to Word 2002 - Selecting Tex ...

Sub SelectChange()
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.WholeStory
FontChange
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
Selection.WholeStory
FontChange
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
Selection.WholeStory
FontChange
End Sub

Sub FontChange()
With Selection.Font
.Name = "Times New Roman"
.Size = 20
.Bold = True
End With
End Sub

Collapse -

Word 2002 - Selecting Text

by MedMan In reply to Word 2002 - Selecting Tex ...

Brilliant! Thankyou very much indeed. I have used the code to make the macro and it works a treat. I have to admit I have not really got into VB. I guess I should make the effort!

Ther's another 250 points if you can answer the related question I have just posed on selecting Styles!

Collapse -

Word 2002 - Selecting Text

by MedMan In reply to Word 2002 - Selecting Tex ...

This question was closed by the author

Back to Software Forum
4 total posts (Page 1 of 1)  

Related Discussions

Related Forums