jacob 给word 指定位置添加超级链接

利用jacob给word 指定位置的文字添加超链接，思路先是通过搜索找到指定位置的文字，然后进行替换添加超链接，代码如下：

package com.jstrd.mobile.security;

import com.jacob.activeX.ActiveXComponent;import com.jacob.com.Dispatch;import com.jacob.com.Variant;

public class TestHyperlinks {   public static ActiveXComponent word;  public static Dispatch selection; public static Dispatch wordFile;  public static Dispatch documents;

//查找指定文字public static boolean find(String toFindText) {

    if (toFindText == null || toFindText.equals(""))        return false;    // 从selection所在位置开始查询    Dispatch find = Dispatch.call(selection, "Find").toDispatch();    // 设置要查找的内容    Dispatch.put(find, "Text", toFindText);    // 向前查找    Dispatch.put(find, "Forward", "True");    // 设置格式    Dispatch.put(find, "Format", "True");    // 大小写匹配    Dispatch.put(find, "MatchCase", "True");    // 全字匹配    Dispatch.put(find, "MatchWholeWord", "True");    // 查找并选中    boolean cc=  Dispatch.call(find, "Execute").getBoolean();

       return cc;}

public static void main(String[] args){

    String filePath = "E:\\test.doc";  word=new ActiveXComponent("Word.Application");

   word.setProperty("Visible", false);     Dispatch documents=word.getProperty("Documents").toDispatch();     Dispatch wordFile=Dispatch.invoke(documents, "Open", Dispatch.Method, new Object[]{filePath,new Variant(true),new Variant(false)}, new int[1]).toDispatch();       

  selection = word.getProperty("Selection").toDispatch();     while (find("指定文字")) {                  Object oRange = Dispatch.call(selection, "Range");         Dispatch Hyperlinks = Dispatch.get(wordFile, "Hyperlinks").toDispatch();       Dispatch.invoke(Hyperlinks, "Add", Dispatch.Method, new Object[] { oRange, new Variant("http://www.baidu.com"),new Variant("SubAddress"),  new Variant("{}"), new Variant("指定文字")}, new int[4]).toDispatch();                   Dispatch.call(selection, "MoveRight");

    }     System.out.println("扫描完毕！");      Dispatch.call(wordFile, "Close", new Variant(true));    Dispatch.call(word, "Quit");   }}

jacob 给word 指定位置添加超级链接相关推荐

【原】为DevExpress的ChartControl添加Y轴控制和 GridControl中指定列添加超级链接
一.控制ChartControl的Y轴范围使用Devexpress中的CharControl控件,需要控制AxisY轴的显示范围,需要使用该控件的BoundDataChanged事件,具体代码如下: ...
poi操作word替换模板向指定位置添加图表
poi操作word替换模板向指定位置添加图表首先是引入pom文件 <dependency><groupId>org.apache.poi</groupId>< ...
怎么将html链接加入到word中,如何在Word中插入目录超级链接？
如何在Word中插入目录超级链接?在Word目录插入超级链接,可以帮助我们快速找到所需的内容,非常方便.如果你不知道如何插入的话,可以参考小编的操作步骤,希望可以帮助到大家. 方法/步骤: 1.首先打 ...
java根据坐标在PDF指定位置添加文本
目录一.使用Aspose 1.前言: 2.创建一个模型 3.demo测试二.使用Itext 1.前言 2.创建模型 3.测试demo 1)测试方法 2)实现代码三.效果展示一.使用Aspose ...
python使用matplotlib可视化线图（line plot）、在可视化图像中的指定位置添加横线(add horizontal line in matplotlib plot)
python使用matplotlib可视化线图(line plot).在可视化图像中的指定位置添加横线(add horizontal line in matplotlib plot) 目录
pandas在dataframe指定位置添加新的数据列、使用insert函数
pandas在dataframe指定位置添加新的数据列.使用insert函数目录 pandas在dataframe指定位置添加新的数据列.使用insert函数 #仿真数据
R语言ggplot2包和ggtext包在可视化图像中的指定位置添加文本框（横向文本框、竖向文本框）
R语言ggplot2包和ggtext包在可视化图像中的指定位置添加文本框(横向文本框.竖向文本框) 目录
js 对表格的动态操作（动态添加行，删除该行，在指定位置添加控件）
***************************************************************** js动态添加表的列,并在列中添加控件的方法<html> ...
Python向DataFrame中指定位置添加一列或多列
对于这个问题,相信很多人都会很困惑,本篇文章将会给大家介绍一种非常简单的方式向DataFrame中任意指定的位置添加一列. 在此之前或许有不少读者已经了解了最普通的添加一列的方式,如下: import ...

jacob 给word 指定位置添加超级链接

jacob 给word 指定位置添加超级链接相关推荐

最新文章

热门文章