问答一下,轻松解决,电脑应用解决专家!
主板显卡CPU内存显示器
硬盘维修显卡维修显示器维修
注册表系统命令DOS命令Win8
存储光存储鼠标键盘
内存维修打印机维修
WinXPWin7Win10/Win11
硬件综合机箱电源散热器手机数码
主板维修CPU维修键盘鼠标维修
Word教程Excel教程PowerPointWPS
网络工具系统工具图像工具
数据库javascriptLinux系统
PHP教程CSS教程XML教程

Excel vba设置单元格边框

更新时间:2021-10-12 11:15 作者:yeyuwanfeng点击:

两种方法:

第一种:

cells(x,y).Borders.LineStyle = xlContinuous ''设置单元格边框

cells(x,y).Borders.ColorIndex = 48 "设置边框颜色

Cells(x,y).Interior.ColorIndex = 48 ' 背景的颜色为色号48

Cells(x,y).Interior.Color = RGB(0, 0, 255) '背景的颜色蓝色

第二种:

Range(Cells(x, y), Cells(x + 1, y)).Borders.LineStyle = xlContinuous "同时给多行单元格设置边框 本例为给 x行及x的下一行 两行同时添加边框

Range(Cells(x, y), Cells(x + 1, y)).Borders.ColorIndex = 48 "同时给多行单元格设置边框颜色

顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
你可能感兴趣的内容