谢谢老师.我测试了一下300页以内,运行没问题.那串数字为 150995199+n ,n为要跳转的页码
.代码修改如下:
* oPPT = CREATEOBJECT("PowerPoint.Application") && 适用微软OFFice

  oPPT = CREATEOBJECT("KWPP.Application")     && 适用WPS office版
oPres = oPPT.Presentations.Add()
LOCAL cID, cTitle
n=210  && 跳转到第210页
* 创建幻灯片并设置标题
FOR i = 1 TO 300
    oSlide = oPres.Slides.Add(i, 1)  && 使用标题布局
    oSlide.Shapes(1).TextFrame.TextRange.Text = "第" + ALLTRIM(STR(i)) + "页"
ENDFOR

* 在第2页添加跳转按钮

oSlide2 = oPres.Slides(2)
oShape = oSlide2.Shapes.AddShape(1, 100, 100, 200, 50)
oShape.TextFrame.TextRange.Text = "跳转到第"+ALLTRIM(STR(n))+"页"

WITH oShape.ActionSettings(1)
    .Action = 7
    .Hyperlink.Address = ''
    .Hyperlink.SubAddress = ALLTRIM(STR(150995199+n))+",0"

ENDWITH
oPres.SaveAs("D:\cs.pptx")

oPres.Close()
oPPT.Quit()
RELEASE ALL
=MESSAGEBOX('文件保存在D盘')
* QUIT