本文介绍通过Java程序在PPT幻灯片中添加超链接的方法,可以给文本或者图片设置超链接,设置超链接时,可设置包括网页链接、邮件地址链接、幻灯片跳转链接等不同指向对象的链接。文中方法使用了免费版PPT类库(Free Spire.Presentation for Java),可在官网下载jar包,并解压将lib文件夹下的jar导入java程序。

如下导入效果:

程序运行环境:Java、IDEA、jdk1.8.0、无需安装Microsoft PowerPoint

Java代码示例

importcom.spire.presentation.*;importcom.spire.presentation.drawing.FillFormatType;importjava.awt.geom.Rectangle2D;publicclassAddHyperlink{publicstaticvoidmain(String[]args)throwsException{//加载测试PPTPresentationppt=newPresentation();ppt.loadFromFile("test.pptx");//实例化Rectangle2D.Double类的对象Rectangle2D.Doublerec=newRectangle2D.Double(350,150,400,180);//在第1张幻灯片上添加形状IAutoShapeshape1=ppt.getSlides().get(0).getShapes().appendShape(ShapeType.RECTANGLE,rec);shape1.getFill().setFillType(FillFormatType.NONE);shape1.getLine().setFillType(FillFormatType.NONE);//添加链接到网页的超链接ParagraphExpara1=newParagraphEx();PortionExtr1=newPortionEx();tr1.setText("1.网页地址链接:点击访问网页");tr1.getClickAction().setAddress("https://www.baidu.com/");para1.getTextRanges().append(tr1);shape1.getTextFrame().getParagraphs().append(para1);shape1.getTextFrame().getParagraphs().append(newParagraphEx());//添加链接到邮箱地址的超链接ParagraphExpara2=newParagraphEx();PortionExtr2=newPortionEx();tr2.setText("2.邮箱地址链接:点击发送邮件");tr2.getClickAction().setAddress("mailto:123654zz@163.com");para2.getTextRanges().append(tr2);shape1.getTextFrame().getParagraphs().append(para2);shape1.getTextFrame().getParagraphs().append(newParagraphEx());//添加超链接跳转到其他幻灯片ParagraphExpara3=newParagraphEx();PortionExtr3=newPortionEx();tr3.setText("3.幻灯片跳转链接:点击跳转到第二张幻灯片");ClickHyperlinklink=newClickHyperlink(ppt.getSlides().get(1));tr3.setClickAction(link);para3.getTextRanges().append(tr3);shape1.getTextFrame().getParagraphs().append(para3);//添加图片到第2张幻灯片,并设置超链接StringimaPath="pd.png";Rectangle2D.Floatrect=newRectangle2D.Float(230,200,500,250);IEmbedImageimage=ppt.getSlides().get(1).getShapes().appendEmbedImage(ShapeType.RECTANGLE,imaPath,rect);image.getLine().setFillType(FillFormatType.NONE);ClickHyperlinkhyperlink=newClickHyperlink("https://www.baidu.com/");image.setClick(hyperlink);//保存文档ppt.saveToFile("AddHyperlink.pptx",FileFormat.PPTX_2010);ppt.dispose();}}

超链接添加效果可在幻灯片放映中查看:

文本超链接:

图片超链接:

(本文完)