网上关于jacob如何操控word的例子已经有很多，但基本处理出来的表格，是没有边框线的。
在这里对此我做点补充，jacob版本是1.17
ActiveXComponent word = new ActiveXComponent("Word.Application");
word.setProperty("Visible", new Variant(true));
Dispatch documents = word.getProperty("Documents").toDispatch();
Dispatch doc = Dispatch.call(documents, "Open", "e:/abc.doc").toDispatch();
// 所有表格

Dispatch tables = Dispatch.get(doc, "Tables").toDispatch();

// 要设置的表格，这里是第一个表格
//width 是宽度值，但top时会出错，不明

Dispatch table = Dispatch.call(tables, "Item", new Variant(1)).toDispatch();

      for(int b=1;b<=6;b++){ 

             Dispatch oBorders = Dispatch.call(table, "Borders", 0-b).toDispatch();

             Dispatch.put(oBorders, "LineStyle", new Variant(1));

             //top第一行时，linewidth设置有错，不明原因 

             //Dispatch.put(oBorders, "LineWidth", new Variant(width));

      } 

....略
 
 

概述：
本文介绍通过Java程序设置Word表格边框的方法，设置边框时可对整个表格设置，也可对指定单元格设置，同时可对边框进行格式化设置设置，包括边框类型、样式、颜色、线条宽度等等，下面将分三个示例来展示如何设置边框效果：
1. 表格边框
   1.1 对整个表格设置统一的边框样式
   1.2 对表格指定边框设置样式
2. 单元格边框（指定单元格设置边框）
程序环境准备：
本文使用的是IDEA，并且需要使用到Word库（Free Spire.Doc for Java免费版），可手动下载并将lib文件夹夹下的Spire.Doc.jar导入java程序；如果想通过Maven仓库下载导入，可参考这里的jar导入方法。
Java 代码示例：
【示例1】对整个表格设置统一的边框样式
import com.spire.doc.*;
import com.spire.doc.documents.BorderStyle;


public class TableBorder2 {
 public static void main(String[] args) {
        //加载Word文档
        Document doc = new Document();
        doc.loadFromFile("sample.docx");

        //获取Section
        Section section = doc.getSections().get(0);

        //获取第一个表格
        Table table = section.getTables().get(0);

        //设置表格边框样式
        table.getTableFormat().getBorders().setBorderType(BorderStyle.Thin_Thick_Thin_Large_Gap);

        //保存文档
        doc.saveToFile("TableBorder2.docx",FileFormat.Docx_2013);
        doc.dispose();
    }
}
整体边框效果：
【示例2】对表格指定边框设置样式
import com.spire.doc.*;
import com.spire.doc.documents.BorderStyle;

import java.awt.*;

public class TableBorder {
 public static void main(String[] args) {
        //加载Word文档
        Document doc = new Document();
        doc.loadFromFile("sample.docx");

        //获取Section
        Section section = doc.getSections().get(0);

        //获取第一个表格
        Table table = section.getTables().get(0);

        //设置上边框
        table.getTableFormat().getBorders().getTop().setBorderType(BorderStyle.Dot_Dash);
        table.getTableFormat().getBorders().getTop().setLineWidth(2f);
        table.getTableFormat().getBorders().getTop().setColor(Color.red);

        //设置右边框
        table.getTableFormat().getBorders().getRight().setBorderType(BorderStyle.Double);
        table.getTableFormat().getBorders().getRight().setLineWidth(2f);
        table.getTableFormat().getBorders().getRight().setColor(Color.green);

        //设置下边框
        table.getTableFormat().getBorders().getBottom().setBorderType(BorderStyle.None);

        //设置左边框
        table.getTableFormat().getBorders().getLeft().setBorderType(BorderStyle.Hairline);
        table.getTableFormat().getBorders().getLeft().setLineWidth(2f);
        table.getTableFormat().getBorders().getLeft().setColor(Color.blue);

        //设置垂直边框
        table.getTableFormat().getBorders().getVertical().setBorderType(BorderStyle.Dot);
        table.getTableFormat().getBorders().getVertical().setLineWidth(2f);
        table.getTableFormat().getBorders().getVertical().setColor(Color.orange);

        //设置水平边框
        table.getTableFormat().getBorders().getHorizontal().setBorderType(BorderStyle.Wave);
        table.getTableFormat().getBorders().getHorizontal().setLineWidth(2f);
        table.getTableFormat().getBorders().getHorizontal().setColor(Color.magenta);

        //保存文档
        doc.saveToFile("TableBorder.docx",FileFormat.Docx_2013);
        doc.dispose();
    }
}
指定边框设置效果：
【实例3】指定单元格设置边框
import com.spire.doc.*;
import com.spire.doc.documents.BorderStyle;

import java.awt.*;

public class CellBorder {
 public static void main(String[] args) {
        //加载Word文档
        Document doc = new Document();
        doc.loadFromFile("sample.docx");

        //获取Section
        Section section = doc.getSections().get(0);

        //获取第一个表格
        Table table = section.getTables().get(0);

        //获取单元格，设置上、下边框
        TableCell cell1 = table.get(0,0);
        cell1.getCellFormat().getBorders().getTop().setBorderType(BorderStyle.Single);
        cell1.getCellFormat().getBorders().getTop().setLineWidth(2f);
        cell1.getCellFormat().getBorders().getTop().setColor(Color.red);
        cell1.getCellFormat().getBorders().getBottom().setBorderType(BorderStyle.Dash_Dot_Stroker);
        cell1.getCellFormat().getBorders().getBottom().setLineWidth(2);
        cell1.getCellFormat().getBorders().getBottom().setColor(Color.pink);

        //获取单元格，设置左、右边框
        TableCell cell2 = table.get(1,1);
        cell2.getCellFormat().getBorders().getLeft().setBorderType(BorderStyle.Hairline);
        cell2.getCellFormat().getBorders().getLeft().setLineWidth(2);
        cell2.getCellFormat().getBorders().getLeft().setColor(Color.yellow);
        cell2.getCellFormat().getBorders().getRight().setBorderType(BorderStyle.Double);
        cell2.getCellFormat().getBorders().getRight().setLineWidth(2f);
        cell2.getCellFormat().getBorders().getRight().setColor(Color.magenta);

        //保存文档
        doc.saveToFile("CellBorder.docx",FileFormat.Docx_2013);
        doc.dispose();
    }
}
单元格边框设置效果：
（完）

在Word中完成表格制作工作后，我们可以将表格中的边框线的线形设置成各种样式，不仅不如此，我们还可以将边框线的颜色自由设置。这样的表格就比平常我们看到的表格要多样化一些。下面就看看是如何操作的吧！

　　首先，右键点击表格，在弹出的右键菜单中选择“边框和底纹”，在“线形”中我们可以设置边框线的样式。然后在“颜色”中选择自己需求的颜色确定即可。

　　以下的GIF动画演示会详细的教您Word中如何设置表格的边框线样式和颜色的！






拖选 任意行 设定改行的边框样式

概述

文本讲述通过C#和VB.NET程序代码给Word中的表格设置边框的方法，可分为给Table表格设置边框、给表格中的指定Cell设置边框，设置边框时，可设置边框颜色、边框类型、边框线条样式、边框线条粗细等等。

工具导入

编辑代码前，先下载需要的Word类库工具，本文中使用的是Spire的免费版库Free Spire.Doc for .NET。下载后，需要解压安装。在VS程序中将安装路径下Bin文件下的Spire.Doc.dll文件添加引用到“解决方案资源管理器”，如下添加引用结果：

代码示例

1. 设置Table边框
[C#]

using Spire.Doc;
using System.Drawing;

namespace SetTableBorder_Doc
{
    class Program
    {
        static void Main(string[] args)
        {
            //加载Word文档
            Document doc = new Document();
            doc.LoadFromFile("test.docx");

            //获取Section
            Section section = doc.Sections[0];

            //获取第一个表格
            Table table = section.Tables[0] as Table;

            //设置上边框
            table.TableFormat.Borders.Top.BorderType = Spire.Doc.Documents.BorderStyle.DotDash;
            table.TableFormat.Borders.Top.LineWidth = 2.0F;
            table.TableFormat.Borders.Top.Color = Color.Red;

            //设置右边框
            table.TableFormat.Borders.Right.BorderType = Spire.Doc.Documents.BorderStyle.Double;
            table.TableFormat.Borders.Right.LineWidth = 2.0F;
            table.TableFormat.Borders.Right.Color = Color.Green;

            //设置下边框
            table.TableFormat.Borders.Bottom.BorderType = Spire.Doc.Documents.BorderStyle.None;

            //设置左边框
            table.TableFormat.Borders.Left.BorderType = Spire.Doc.Documents.BorderStyle.Hairline;
            table.TableFormat.Borders.Left.LineWidth = 2.0F;
            table.TableFormat.Borders.Left.Color = Color.Blue;

            //设置垂直边框
            table.TableFormat.Borders.Vertical.BorderType = Spire.Doc.Documents.BorderStyle.Dot;
            table.TableFormat.Borders.Vertical.LineWidth = 2.0F;
            table.TableFormat.Borders.Vertical.Color = Color.Orange;

            //设置水平边框
            table.TableFormat.Borders.Horizontal.BorderType = Spire.Doc.Documents.BorderStyle.Wave;
            table.TableFormat.Borders.Horizontal.LineWidth = 2.0F;
            table.TableFormat.Borders.Horizontal.Color = Color.Purple;

            //保存文档
            doc.SaveToFile("SetTableBorder.docx",FileFormat.Docx2013);
            System.Diagnostics.Process.Start("SetTableBorder.docx");
        }
    }
}


表格边框设置结果：

[VB.NET]

Imports Spire.Doc
Imports System.Drawing

Namespace SetTableBorder_Doc
    Class Program
        Private Shared Sub Main(args As String())
            '加载Word文档
            Dim doc As New Document()
            doc.LoadFromFile("test.docx")

            '获取Section
            Dim section As Section = doc.Sections(0)

            '获取第一个表格
            Dim table As Table = TryCast(section.Tables(0), Table)

            '设置上边框
            table.TableFormat.Borders.Top.BorderType = Spire.Doc.Documents.BorderStyle.DotDash
            table.TableFormat.Borders.Top.LineWidth = 2F
            table.TableFormat.Borders.Top.Color = Color.Red

            '设置右边框
            table.TableFormat.Borders.Right.BorderType = Spire.Doc.Documents.BorderStyle.[Double]
            table.TableFormat.Borders.Right.LineWidth = 2F
            table.TableFormat.Borders.Right.Color = Color.Green

            '设置下边框
            table.TableFormat.Borders.Bottom.BorderType = Spire.Doc.Documents.BorderStyle.None

            '设置左边框
            table.TableFormat.Borders.Left.BorderType = Spire.Doc.Documents.BorderStyle.Hairline
            table.TableFormat.Borders.Left.LineWidth = 2F
            table.TableFormat.Borders.Left.Color = Color.Blue

            '设置垂直边框
            table.TableFormat.Borders.Vertical.BorderType = Spire.Doc.Documents.BorderStyle.Dot
            table.TableFormat.Borders.Vertical.LineWidth = 2F
            table.TableFormat.Borders.Vertical.Color = Color.Orange

            '设置水平边框
            table.TableFormat.Borders.Horizontal.BorderType = Spire.Doc.Documents.BorderStyle.Wave
            table.TableFormat.Borders.Horizontal.LineWidth = 2F
            table.TableFormat.Borders.Horizontal.Color = Color.Purple

            '保存文档
            doc.SaveToFile("SetTableBorder.docx", FileFormat.Docx2013)
            System.Diagnostics.Process.Start("SetTableBorder.docx")

        End Sub
    End Class
End Namespace

2. 设置Cell边框
[C#]

using Spire.Doc;
using System.Drawing;

namespace SetCellBorder_Doc
{
    class Program
    {
        static void Main(string[] args)
        {
            //加载Word文档
            Document doc = new Document();
            doc.LoadFromFile("test.docx");

            //获取Section
            Section section = doc.Sections[0];

            //获取第一个表格
            Table table = section.Tables[0] as Table;

            //获取单元格，设置上、下边框
            TableCell cell1 = table[0, 0];
            cell1.CellFormat.Borders.Top.BorderType = Spire.Doc.Documents.BorderStyle.Single;
            cell1.CellFormat.Borders.Top.LineWidth = 2.0F;
            cell1.CellFormat.Borders.Top.Color = Color.Red;
            cell1.CellFormat.Borders.Bottom.BorderType = Spire.Doc.Documents.BorderStyle.DashDotStroker;
            cell1.CellFormat.Borders.Bottom.LineWidth = 2.0F;
            cell1.CellFormat.Borders.Bottom.Color = Color.Pink;

            //获取单元格，设置左、右边框
            TableCell cell2 = table[2, 2];
            cell2.CellFormat.Borders.Left.BorderType = Spire.Doc.Documents.BorderStyle.Hairline;
            cell2.CellFormat.Borders.Left.LineWidth = 2.0F;
            cell2.CellFormat.Borders.Left.Color = Color.Yellow;
            cell2.CellFormat.Borders.Right.BorderType = Spire.Doc.Documents.BorderStyle.Double;
            cell2.CellFormat.Borders.Right.LineWidth = 2.0F;
            cell2.CellFormat.Borders.Right.Color = Color.HotPink;

            //保存文档
            doc.SaveToFile("SetCellBorder.docx",FileFormat.Docx2013);
            System.Diagnostics.Process.Start("SetCellBorder.docx");
        }
    }
}


单元格边框设置结果：

[VB.NET]

Imports Spire.Doc
Imports System.Drawing

Namespace SetCellBorder_Doc
    Class Program
        Private Shared Sub Main(args As String())
            '加载Word文档
            Dim doc As New Document()
            doc.LoadFromFile("test.docx")

            '获取Section
            Dim section As Section = doc.Sections(0)

            '获取第一个表格
            Dim table As Table = TryCast(section.Tables(0), Table)

            '获取单元格，设置上、下边框
            Dim cell1 As TableCell = table(0, 0)
            cell1.CellFormat.Borders.Top.BorderType = Spire.Doc.Documents.BorderStyle.[Single]
            cell1.CellFormat.Borders.Top.LineWidth = 2F
            cell1.CellFormat.Borders.Top.Color = Color.Red
            cell1.CellFormat.Borders.Bottom.BorderType = Spire.Doc.Documents.BorderStyle.DashDotStroker
            cell1.CellFormat.Borders.Bottom.LineWidth = 2F
            cell1.CellFormat.Borders.Bottom.Color = Color.Pink

            '获取单元格，设置左、右边框
            Dim cell2 As TableCell = table(2, 2)
            cell2.CellFormat.Borders.Left.BorderType = Spire.Doc.Documents.BorderStyle.Hairline
            cell2.CellFormat.Borders.Left.LineWidth = 2F
            cell2.CellFormat.Borders.Left.Color = Color.Yellow
            cell2.CellFormat.Borders.Right.BorderType = Spire.Doc.Documents.BorderStyle.[Double]
            cell2.CellFormat.Borders.Right.LineWidth = 2F
            cell2.CellFormat.Borders.Right.Color = Color.HotPink

            '保存文档
            doc.SaveToFile("SetCellBorder.docx", FileFormat.Docx2013)
            System.Diagnostics.Process.Start("SetCellBorder.docx")
        End Sub
    End Class
End Namespace