EXCEL使用技巧:[3]宏与VBA妙用(颜色)
巧妙地利用宏和VBA调试中的各项数据,随心所欲调节颜色。
本文目的:
1 宏录制的好处
2 通过调试录制宏,得到相应信息
操作方法
- 01
第一步,设置颜色 EXCEL中找两个方格,B2、D2,随机找个颜色赋给B2
- 02
选择颜色
- 03
改变后的颜色
- 04
第二步,录制宏 录制一个宏,内容是把颜色1(B2)用格式刷刷给颜色2(D2) 点击录制
- 05
把颜色1(B2)用格式刷刷给颜色2(D2)
- 06
第三步,查看宏代码 代码如下 *******************代码↓******************** Sub Macro1() ' ' Macro1 Macro ' ' Range("B2").Select Application.CutCopyMode = False Selection.Copy Range("D2").Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Application.CutCopyMode = False End Sub *******************代码↑******************** 但是代码中并未出现颜色,这就要用到调试了
- 07
第四步,调试 在代码区按F8,进入单步调试
- 08
待黄色箭头走到 Range("B2").Select 这一句的下一行,在监视窗口下右击->添加监视
- 09
在弹出的对话框,输入Range("B2")
- 10
第五步,找到颜色参数 找到颜色参数Range("B2").Interior.Color,在监视窗口这行的数值就是颜色值,记录下颜色值:5276238
- 11
第六步,根据需要设置颜色 这一步就可以根据需要设置颜色了,比如我要将F2方格设置成和B2颜色一样,就可以写一个SUB块,如下 Sub Macro2() Range("F2").Interior.Color = 5276238 End Sub
- 12
执行,会发现F2方格变得和B2颜色一样了