Java 添加超链接到Excel文档

时间:2020-02-28 E-iceblue 人气:1

超链接即内容链接，通过给特定对象设置超链接，可实现载体与特定网页、文件、邮件、网络等的链接，点击链接载体可打开链接目标，在文档处理中是一种比较常用的功能。本文将介绍通过Java程序给Excel文档添加超链接的方法，这里支持添加多种不同类型的链接，如URL网页链接、Workbook工作簿链接、File文档链接、Unc网络路径链接等。

使用工具：Free Spire.XLS for Java （免费版）

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

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("https://www.baidu.com/");

        //添加URL链接，链接到邮件地址
        HyperLink MailLink = sheet.getHyperLinks().add(sheet.getCellRange("D3"));
        MailLink.setTextToDisplay(sheet.getCellRange("D3").getText());
        MailLink.getType().compareTo(HyperLinkType.Url);
        MailLink.setAddress("mailto: support @ e-iceblue.com");

        //添加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();
    }
}

文档超链接添加效果：

加载全部内容