Excuse me each teacher, why run WORD in VB6 footer what page
Wrdapp. NormalTemplate. AutoTextEntries (" the first X, Y pages "). Insert the Where:=wrdRange, RichText:=True
When an error:
Real-time error 5941: set the required member does not exist,

Thank you very much!