word表格怎么设置边框vb代码

打开word双击桌面word图标打开word窗口，也可同时按下“win+r'键，在运行对话框中输入：winword，回车亦可快速打开word窗口。

制作样表在打开的word文档中，插入一个样表，用于后期操作。

把光标定位到表格中，这时工具栏会出“设计”选框卡，点击切换到该页面上。

开始录制宏1.此时，在word应用程序窗口的状态栏中，找到如图“录制宏”按钮，进行单击。

2.弹出的“录制宏”窗口，保持默认配置不变，点击“确定”开始录制。

3.点击“设计”选项卡中样式列表后面的下拉按钮，在下拉菜单中选择“修改表格样式”。

在弹出的“修改样式”窗口，依次修改“线型”、“线宽”、“线的颜色”、以及“边框”（必须重新选择，否则修改不会反映到表格中）。

点击“确定”，确定表格边框样式的修改。

完成宏录制再次在word应用程序窗口的状态栏中，找到如图“录制宏”按钮，单击停止宏录制。

查看宏代码在word窗口，依次点击工具栏“开发工具”——“Visual Basic”或直接按下组合键“ALT+F11”,打开宏代码窗口。

可以看到代码窗口的代码挺多，是不是有一种脑胀的感觉。

查看关键代码其实，大家不用害怕，只要稍微认真观察一下，大家就会发现这些代码大多都是在重复，关键代码也就那么几项，也正是我们所需要的。    With ActiveDocument.Styles('网格型').Table        With .Shading            .Texture = wdTextureNone            .ForegroundPatternColor = wdColorAutomatic            .BackgroundPatternColor = wdColorAutomatic        End With        With .Borders(wdBorderLeft)            .LineStyle = wdLineStyleDashLargeGap            .LineWidth = wdLineWidth300pt            .Color = wdColorRed        End With……    End With