Java在Excel中添加超链接

码农公社  210.net.cn   210= 1024  10月24日一个重要的节日--码农(程序员)节

本文将介绍通过Java程序给Excel文档添加超链接的方法,这里支持添加多种不同类型的链接,如URL网页链接、Workbook工作簿链接、File文档链接、Unc网络路径链接等。

使用工具:Free Spire.XLS for Java (免费版)

注:通过官网下载包,并解压将lib文件夹下的jar文件导入java程序。如下导入效果:


1.jpg

Java代码示例

import com.spire.xls.*;


public class AddHyperlink {

    public static void main(String[] args) {

        //加载Excel文档

        Workbook wb = new Workbook();

        wb.loadFromFile("test.xlsx");

        //获取工作表

        Worksheet sheet = wb.getWorksheets().get(0);


        //添加URL链接,链接到网页地址

        HyperLink UrlLink = sheet.getHyperLinks().add(sheet.getCellRange("B3"));

        UrlLink.setTextToDisplay(sheet.getCellRange("B3").getText());

        UrlLink.getType().compareTo(HyperLinkType.Url);

        UrlLink.setAddress("http://www.210.net.cn/");


        //添加URL链接,链接到邮件地址

        HyperLink MailLink = sheet.getHyperLinks().add(sheet.getCellRange("D3"));

        MailLink.setTextToDisplay(sheet.getCellRange("D3").getText());

        MailLink.getType().compareTo(HyperLinkType.Url);

        MailLink.setAddress("mailto: 210@177.xyz");


        //添加File文档链接,链接到指定文档

        HyperLink FileLink = sheet.getHyperLinks().add(sheet.getCellRange("B7"));

        FileLink.setTextToDisplay(sheet.getCellRange("B7").getText());

        FileLink.getType().compareTo(HyperLinkType.File);

        FileLink.setAddress("E:\\IDEA\\sample.docx");


        // 添加Workbook文档链接,链接到工作簿文档(这里链接到测试文档中的指定sheet中的指定单元格)

        HyperLink WbLink = sheet.getHyperLinks().add(sheet.getCellRange("D7"));

        WbLink.getType().compareTo(HyperLinkType.Workbook);

        WbLink.setTextToDisplay(sheet.getCellRange("D7").getText());

        WbLink.setAddress("Sheet2!B5");


        //添加Unc链接,链接到网络路径

        HyperLink UncLink = sheet.getHyperLinks().add(sheet.getCellRange("B11"));

        UncLink.getType().compareTo(HyperLinkType.Unc);

        UncLink.setTextToDisplay(sheet.getCellRange("B11").getText());

        UncLink.setAddress("\\192.168.1.108");


        //保存文档

        wb.saveToFile("AddHyperlink.xlsx",ExcelVersion.Version2010);

        wb.dispose();

    }

}

文档超链接添加效果:

1.jpg

评论