使用excel中的vba函数给表格区域添加绿框
1、首先我们打开一个工作样表作为例子。
2、按下alt+f11进入vba编辑器,插入一个 新的模块,在模块编辑窗口中输入以下代码:
Sub 添加绿框()
Worksheets("源数据").Range("A1:D4").BorderAround _
ColorIndex:=4, Weight:=xlThick
End Sub
3、其中添加绿框是过程名,worksheets是工作表名,(“源数据”)为工作薄名。可以直接写成sheet2.range。也就是Worksheets("源数据")==sheet2.range。
4、range为指定单元格区域函数,本例中指定的范围是a1:d4。而borderaround函数是向单元格区域添加边框,并设置该边框的 Color、LineStyle 和 Weight属性。Variant 类型。
5、单元格区域添加的是外边框。可以设置其颜色,线型和宽度。其中color参数为颜色下标,variant参数为rgb值,两者功能相同,必须选择其一,但不能同时存在。本例中使用的是下标color参数。
6、我们制定宏按钮,并实际运行一下,可以看到A1:D4这个单元格区域添加了一个绿色的边框,此函数大家可以多试验。
相关推荐:
新闻热点
疑难解答