Excel VBA:设置单元格边框
Border 对象
代表对象的边框。
说明
大多数具有边框的对象（除 Range 和 Style 对象外）都将边框作为单一实体处理，而不管边框有几个边。整个边框必须作为一个整体单位返回。例如，使用 TrendLine 对象的 Border 属性可返回此类对象的 Border 对象。
示例
下例更改活动图表中趋势线的类型和线型。
With ActiveChart.SeriesCollection(1).Trendlines(1).Type = xlLinear.Border.LineStyle = xlDash
End WithRange 和 Style 对象具有四个分立的边框：左边框、右边框、顶部边框和底部边框，这四个边框既可单独返回，也可作为一个组同时返回。使用 Borders 属性可返回 Borders 集合，该集合包含所有四个边框，并将这些边框视为一个单位。下例向第一张工作表上的单元格 A1 添加双边框。
Worksheets(1).Range("A1").Borders.LineStyle = xlDouble使用 Borders(index)（其中index 指定边框）可返回单个 Border 对象。下例设置单元格区域 A1:G1 的底部边框的颜色。
Worksheets("Sheet1").Range("A1:G1"). _Borders(xlEdgeBottom).Color = RGB(255, 0, 0)Index 可为以下 XlBordersIndex 常量之一：xlDiagonalDown、xlDiagonalUp、xlEdgeBottom、xlEdgeLeft、xlEdgeRight、xlEdgeTop、xlInsideHorizontal 或 xlInsideVertical。
XlBordersIndex 枚举
指定要检索的边框。
| 名称 | 值 | 说明 |
|---|---|---|
| xlDiagonalDown | 5 | 从区域中每个单元格的左上角至右下角的边框。 |
| xlDiagonalUp | 6 | 从区域中每个单元格的左下角至右上角的边框。 |
| xlEdgeBottom | 9 | 区域底部的边框。 |
| xlEdgeLeft | 7 | 区域左边的边框。 |
| xlEdgeRight | 10 | 区域右边的边框。 |
| xlEdgeTop | 8 | 区域顶部的边框。 |
| xlInsideHorizontal | 12 | 区域中所有单元格的水平边框（区域以外的边框除外）。 |
| xlInsideVertical | 11 | 区域中所有单元格的垂直边框（区域以外的边框除外）。 |
Borders.LineStyle 属性
返回或设置边框的线型。XlLineStyle、xlGray25、xlGray50、xlGray75 或 xlAutomatic 类型，可读写。
语法
表达式.LineStyle
表达式 一个代表 Borders 对象的变量。
示例
本示例为 Chart1 的图表区和绘图区域设置边框。
With Charts("Chart1").ChartArea.Border.LineStyle = xlDashDotWith .PlotArea.Border.LineStyle = xlDashDotDot.Weight = xlThickEnd With
End WithXlLineStyle 枚举
指定边框的线条样式。
| 名称 | 值 | 说明 |
|---|---|---|
| xlContinuous | 1 | 实线。 |
| xlDash | -4115 | 虚线。 |
| xlDashDot | 4 | 点划相间线。 |
| xlDashDotDot | 5 | 划线后跟两个点。 |
| xlDot | -4118 | 点式线。 |
| xlDouble | -4119 | 双线。 |
| xlLineStyleNone | -4142 | 无线条。 |
| xlSlantDashDot | 13 | 倾斜的划线。 |
Borders 对象成员
由四个 Border 对象组成的集合，它们分别代表 Range 或 Style 对象的四个边框。
属性
| 名称 | 说明 | |
|---|---|---|
| Application | 如果不使用对象识别符，则该属性返回一个代表 Microsoft Excel 应用程序的 Application 对象。如果使用对象识别符，则该属性返回一个代表指定对象的创建程序的 Application 对象（可对一个 OLE 自动化对象使用该属性来返回该对象的应用程序）。只读。 | |
| Color | 返回或设置对象的主要颜色，如注释部分中的表格所示。使用 RGB 函数可创建颜色值。Variant 型，可读写。 | |
| ColorIndex | 返回或设置一个 Variant 值，它代表全部四条边框的颜色。 | |
| Count | 返回一个 Long 值，它代表集合中对象的数量。 | |
| Creator | 返回一个 32 位整数，该整数指示创建对象的应用程序。只读 Long 类型。 | |
| Item | 返回一个 Border 对象，该对象代表单元格区域或某个样式的边框之一。 | |
| LineStyle | 返回或设置边框的线型。XlLineStyle、xlGray25、xlGray50、xlGray75 或 xlAutomatic 类型，可读写。 | |
| Parent | 返回指定对象的父对象。只读。 | |
| ThemeColor | 返回或设置已应用的配色方案中的主题颜色，该配色方案与指定对象相关联。可读/写 Variant 类型。 | |
| TintAndShade | 返回或设置一个 Single，使颜色变深或变浅。 | |
| Value | Borders.LineStyle 的同义词。 | |
| Weight | 返回或设置一个 XlBorderWeight 值，它代表边框的粗细。 |
Borders.Color 属性
返回或设置对象的主要颜色，如注释部分中的表格所示。使用 RGB 函数可创建颜色值。Variant 型，可读写。
语法
表达式.Color
表达式 一个返回 Borders 对象的表达式。
说明
| 对象 | 对应颜色 |
|---|---|
| 边框 | 边框的颜色。 |
| Borders | 一个区域的所有四条边的颜色。如果四边不是同一种颜色，则 Color 返回的是 0（零）。 |
| Font | 字体的颜色。 |
| Interior | 单元格底纹的颜色或图形对象的填充颜色。 |
| Tab | 选项卡的颜色。 |
示例
此示例对 Chart1 中数值坐标轴的刻度线标志颜色进行设置。
Charts("Chart1").Axes(xlValue).TickLabels.Font.Color = _RGB(0, 255, 0)| Borders.ColorIndex 属性 |
返回或设置一个 Variant 值，它代表全部四条边框的颜色。
语法
表达式.ColorIndex
表达式 一个代表 Borders 对象的变量。
说明
如果全部四条边框不是同一种颜色，此属性返回 Null。
颜色可指定为当前调色板中颜色的索引值，也可指定为下列 XlColorIndex 常量之一：
- xlColorIndexAutomatic
- xlColorIndexNone
| XlColorIndex 枚举 |
指定所选功能（如边框、字体或填充）的颜色。
| 名称 | 值 | 说明 |
|---|---|---|
| xlColorIndexAutomatic | -4105 | 自动配色。 |
| xlColorIndexNone | -4142 | 无色。 |
| Borders.Count 属性 |
返回一个 Long 值，它代表集合中对象的数量。
语法
表达式.Count
表达式 一个代表 Borders 对象的变量
| Borders.Item 属性 |
返回一个 Border 对象，它代表单元格区域或样式的边框之一。
语法
表达式.Item(Index)
表达式 一个代表 Borders 对象的变量。
参数
| 名称 | 必选/可选 | 数据类型 | 说明 |
|---|---|---|---|
| Index | 必选 | XlBordersIndex | XlBordersIndex 的常量之一。 |
说明
| XlBordersIndex 可为下列 XlBordersIndex 常量之一。 |
| xlDiagonalDown |
| xlDiagonalUp |
| xlEdgeBottom |
| xlEdgeLeft |
| xlEdgeRight |
| xlEdgeTop |
| xlInsideHorizontal |
| xlInsideVertical |
示例
下例设置单元格区域 A1:G1 的底部边界的颜色。
Worksheets("Sheet1").Range("a1:g1"). _Borders.Item(xlEdgeBottom).Color = RGB(255, 0, 0)| Borders.Weight 属性 |
返回或设置一个 XlBorderWeight 值，它代表边框的粗细。
语法
表达式.Weight
表达式 一个代表 Borders 对象的变量。
| XlBorderWeight 枚举 |
指定某一区域周围的边框的粗细。
| 名称 | 值 | 说明 |
|---|---|---|
| xlHairline | 1 | 细线（最细的边框）。 |
| xlMedium | -4138 | 中等。 |
| xlThick | 4 | 粗（最宽的边框）。 |
| xlThin | 2 | 细。 |
source: VBA Help
Excel VBA:设置单元格边框相关推荐
- Excel vba设置单元格边框
两种方法: 第一种: cells(x,y).Borders.LineStyle = xlContinuous ''设置单元格边框 cells(x,y).Borders.ColorIndex = 4 ...
- VBA Excel实践如何系列（三）vba如何设置单元格边框、字体
vba设置单元格字体,以下是设置给定单元格内字体的加粗,单元格填充灰色等,参数是Range对象 Sub font_sty(Rng As Range)Rng.SelectSelection.Font.B ...
- VBA操作Excel之设置单元格属性
VBA操作Excel简介 一.VBA读写Excel文件 二.VBA设置单元格属性 三.VBA弹出输入和输出窗口 参考文档 一.VBA读写Excel文件 VBA简介及打开Excel文件方法见VBA读写E ...
- excel设置单元格边框线, 自适应行高
/*** 设置单元格边框线, 自适应行高** @param workbook*/private static void setBorderAndLineHeight(Workbook workbook ...
- poi 导出excel实战与word新增行与excel添加背景色与设置单元格边框
提示:本文尽可能简洁通俗的讲解[poi 导出excel实战] ,如需导入可见文尾 一.导入依赖: <!--Apache poi--><!--xls(03)--><depe ...
- thinkphp设置excel表格的单元格边框颜色样式
thinkphp设置excel表格单元格边框 //设置单元格边框 $styleThinBlackBorderOutline = array('borders' => array ('allbor ...
- html设置单元格边框颜色
<!DOCTYPE <!DOCTYPE html> <html> <head> <meta charset="utf-8"/> ...
- java 批量设置单元格边框,VC下设置Excel单元格的边框 (转)
为了能使得输出到Excel中的数据显示表格,可以调用事先设置好的模板,但是不灵活.我花了一个中午的时间摸索出如何设置它了. 具体代码如下: LPDISPATCH pRange; CString c ...
- laravel从入门到精通之 php excel设置单元格边框只显示竖条
之前用就可以显示四周的边框 $sheet->setBorder('A' . ($i * 22 + 2) . ':H' . ($i * 22 + 7), 'thin'); 最近使用的时候发现边框只 ...
最新文章
- 走过路过不要错过，面了六轮才拿到阿里Android研发岗的Offer，确定不来看看？
- 超便携式截屏录屏软件FastStone Capture
- LeetCode Algorithm 589. N 叉树的前序遍历
- python操作csv文件第7行开始的数据_Python教程-Python读写CSV文件
- python与linux关系_如何处理Linux / Python依赖关系？
- ZJOI2007 棋盘制作
- springboot实现拦截器
- 英语面试功略：英语口语突击法
- 快速上手系列：传智播客Java基础笔记
- 如何下载Discuz
- linux下把 python 程序运行的输出结果记录到 log 文件中
- python3菜鸟教程100例-Python3
- 计算不可压缩流体- NS方程求解算法
- 企业如何从CMMI3升级为CMMI5，有哪些优势？
- taptap需要相机权限_TapTap双击背部App-实现安卓11双击手机背面截屏拍照等新功能-软极客...
- turtle绘制奥运五环
- 【Python入门教程】第45篇 集合的并集
- android 虚拟按键源码流程分析
- maven 加入第三方库_maven 手动添加第三方的jar包
- 高一计算机专业班主任工作总结,【班主任工作总结报告计算机材料】