WPS的excel的页眉页脚批量更改，宏的做法

Question

我用宏做的，页眉分3部分，左中右，左面的工程名称都是不一样的，右边的都是一模一样的页码，我只想更改最右边的页码，录制宏之后，左边的一栏名称全部自动改成了录制宏的那个表格的名称，我现在想让页眉左边名称不变，右边页码更改内容怎么做

Answer 1

右键单击任一工作表标签 选择 选定全部工作表（工作簿名称后面带有[工作组]字样） 文件 页面设置 工作表 从页眉下拉选项中选择 或 自定义 页眉 确定~

Answer 2

请把你的宏代码贴出来，用文本方式，便于直接修改。追问

字数太多，发不出来，给你个图片行吗

追答

修改.RightHeader那一行，把里面的【表格编号】等内容，修改为工作表名称的变量ActriveSheet.Name，注意需要使用引号和&，如果完全没有VBA基础，请你粘贴这一行的文本，我给你修改。

追问

.RightHeader = "&" & """" & "Arial" & """" & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "表格编号：JK-01 第1页共7页"

追答

.RightHeader = "&" & """" & "Arial" & """" & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "表格编号："& ActiveSheet.Name &" 第1页共7页"

追问

不对，用其他表格运行，名称还是改成了这个邮储银行的名字，我的意思是有很多excel表，我用其他表运行这个宏的时候，左边的名称栏是不变的，只修改右边的页码

追答

你需要哪个汉字修改为什么内容（工作表名、EXCEL文件名）都是可以的，粘贴对应的语句，指出需要修改的汉字，以及修改为什么内容，按照我前面把JK-01修改为ActiveSheet.Name的方法修改就可以。

追问

有邮箱吗？我发给您，您给修改一下，做个宏

追答

不用发邮箱，百度云分享就可以，关键是我还没有明白你究竟要把哪几个汉字修改为什么变量，前一条追答的几个疑问。

追问

不好意思，下午有事，没上网，我现在想要的是让左侧一览名称不变，每个excel都保留自己的名称，这个是重点。例如excel1中的sheet1工程名称是1，页码是3，excel2中的sheet1工程名称是2，页码是3，我excel1做了宏之后要把excel2的页码3替换成4，工程名称2不变。我现在的宏是excel2工程名称也改成了1，在不明白我也没办法了。。。。。