word页码问题

udnovo

各位大佬，我新装的win10系统，word是2021版，别人发给我的文件，如果页码是在文本框里那种，到我这就只能显示一位数，只能重新设置页码，这个问题怎么解决？

413191246se

楼主，方便的话，请上附件。

udnovo

413191246se 发表于 2024-1-18 01:21
楼主，方便的话，请上附件。

不是某个文件这样，是所有的文件都是这个问题

413191246se

* 楼主，我看你的 Office 版本是 2013；我的系统也是 Win10x64 的联想电脑，自带 Office2019。
* 我建议：请升级到 Office2019 以上（卸载 2013，安装新版本，但激活问题我整不明白）最好。
* 要是下载 Office 2019 以上版本，可以到 MSDN 的 iwilltellyou 网站下载，前些天我下载过。

诡天翼1988

一般用wps设置页码才用文本框，用word打开后，页码显示不全，直接把文本框拉长就可以了。

过客fppt

楼主好，你可以把原来页码的文本框全部删除，然后用以下代码生成页码就好。

1. Sub 插入页码()
   
2.     Dim rng As Range
   
3.     Dim section As section
   
4.     Dim header As Range
   
5.    
   
6.     ' 循环遍历每个节
   
7.     For Each section In ActiveDocument.Sections
   
8.         ' 获取节的页眉
   
9.         Set header = section.Headers(wdHeaderFooterPrimary).Range
   
10.         
    
11.         ' 将插入点移至页眉末尾，并插入页码字段
    
12.         With header
    
13.             .Collapse wdCollapseEnd
    
14.             .Fields.Add Range:=header, Type:=wdFieldEmpty, text:="PAGE"
    
15.         End With
    
16.         
    
17.         ' 设置页眉的对齐方式为右对齐
    
18.         header.ParagraphFormat.Alignment = wdAlignParagraphRight
    
19.     Next section
    
20. End Sub
    

复制代码