لدي رمز تعيين للصفحة الحالية
var
MMMM ، NNN ، AAA: Olevariant ؛
يبدأ
mmmm: = wdline ؛
nnn: = 1 ؛
AAA: = wdfieldpage ؛
WordApp.ActiveWindow.activepane.view.seekview: = wdseekcurrentPageHeader ؛
wordapp.selection.move (mm ، nnn) ؛
wordapp.selection.peragraphformat.alignment: = wdalignparagraphcenter ؛
wordapp.selection.insertafter ('part') ؛
mmmm: = wdcharacter ؛
wordapp.selection.move (mm ، nnn) ؛
wordapp.selection.fields.add (wordapp.selection.range ، aaa ، mmm ، nnn) ؛
AAA: = wdfieldnumpages ؛
WordApp.Selection.InserTafter ("الصفحة/الفصل") ؛
wordapp.selection.move (mm ، nnn) ؛
wordapp.selection.fields.add (wordapp.selection.range ، aaa ، mmm ، nnn) ؛
wordapp.selection.insertafter ('page') ؛
WordApp.ActiveWindow.activepane.view.seekview: = wdseekmaindocument ؛
نهاية؛
ولكن يمكنك فقط تعديل الصفحة الأولى.