我们添加一个域然后使用Office录制宏代码:
Sub 宏1()
'
' 宏1 宏
'
'
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
"PAGE \* Arabic ", PreserveFormatting:=True
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
"NUMPAGES \# ""/0"" \* Arabic ", PreserveFormatting:=True
End Sub
然后我们在操作Office的时候也通过对应的Api来添加域:
var pageSelection = centerRange.Application.Selection;
var allPageSelection = centerRange.Application.Selection;
centerRange.Fields.Add(pageSelection.Range, WdFieldType.wdFieldEmpty, @"PAGE \* Arabic", true);
centerRange.Fields.Add(allPageSelection.Range, WdFieldType.wdFieldEmpty, @"NUMPAGES \# ""/0"" \* Arabic ", true);
在本地调试可以正常生成Office,但是上到服务器的时候,就报错此命令无效
然后通过查询最后将代码改成了这样
object oMission = Missing.Value;
Object currentPageFiled = WdFieldType.wdFieldPage;
var selection = centerRange.Document.ActiveWindow.Selection;
Object totalPageFiled = WdFieldType.wdFieldNumPages;
centerRange.Document.ActiveWindow.Selection.TypeText(string.Empty);
centerRange.Fields.Add(selection.Range, ref currentPageFiled, ref oMission, ref oMission);
centerRange.Document.ActiveWindow.Selection.TypeText("/");
centerRange.Fields.Add(selection.Range, ref totalPageFiled, ref oMission, ref oMission);
然后服务端也就正常运行了,出现错误的原因,应该就是识别不了Add()方法的Text传递的参数NUMPAGES # “”/0"" * Arabic ,也就是这段域代码。
不会写文章的猴子 发布了13 篇原创文章 · 获赞 2 · 访问量 473 私信 关注