autotext problem

[calista lim]

i read a few of the comments state that the autotext (to insert autotext such
pathname/location of file/folder name into the footer) which i used to do
using MS Office 2003 is not available or not functioning properly in MS
2007??? so how's the status now as i need to use it? seek for advise
....thanks.

 

[Graham Mayor]

Create your own autotext entry to insert a filename field with a \p switch
or
simply insert the filename field in the footer.
or
use a macro to insert the filename

Sub InsertFilenameInFooter()
Dim iSec As Integer
Dim rFooter As Range
With ActiveDocument
If Len(.Path) = 0 Then .Save
iSec = .Sections.Count
Set rFooter = .Sections(iSec).Footers(wdHeaderFooterPrimary).Range
rFooter.InsertAfter vbCr & .FullName
With rFooter.Paragraphs(rFooter.Paragraphs.Count)
.Alignment = wdAlignParagraphRight
With .Range
.Font.name = "Arial"
.Font.Size = 8
End With
End With
End With
End Sub

http://www.gmayor.com/installing_macro.htm
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[Suzanne S. Barnhill]

See Insert filename and path building block in Word 2007
http://office.microsoft.com/en-us/templates/TC300002951033.aspx

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org