Replace the line:
With rng.table(1).cell(2,2)
with this line:
With rng.Tables(1).Cell(2, 2).Range
--
Regards
Lene Fredborg
DocTools - Denmark
www.thedoctools.com
Document automation - add-ins, macros and templates for Microsoft Word
"Grenier" wrote:
> looking for the right syntax to access a cell in a footer ?
>
> here's what I've tried with no success...
> Set Rng = ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary).Range
> with rng.table(1).cell(2,2)
> .text = "updated on february 25"
> end with
>
> Merci !