巧妙地利用宏和VBA调试中的各项数据,随心所欲调节颜色。本文目的:1宏录制的好处2通过调试录制宏,得到相应信息
工具/原料
EXCEL
方法/步骤
1、第一步,设置颜色EXCEL中找两个方格,BD2,随机找个颜色赋给B2
2、选择颜色
3、改变后的颜色
4、第二步,录制宏录制一个宏,内容是把颜色1(B2)用格式刷刷给颜色2(D2)点击录制
5、把颜色1(B2)用格式刷刷给颜色2(D2)
6、第三步,查看宏代码代码如下*******************代码↓**********涯箨唁峦**********SubMacro1()''Macro1Macro&垆杪屑丝#39;'Range("B2").SelectApplication.CutCopyMode=FalseSelection.CopyRange("D2").SelectSelection.PasteSpecialPaste:=xlPasteFormats,Operation:=xlNone,_SkipBlanks:=False,Transpose:=FalseApplication.CutCopyMode=FalseEndSub*******************代码↑********************但是代码中并未出现颜色,这就要用到调试了
7、第四步,调试在代码区按F8,进入单步调试
8、待黄色箭头走到Range("B2").Select这一句的下一行,在监视窗口下右击->添加监视
9、在弹出的对话框,输入Range("B2")
10、第五步,找到颜色参数找到颜色参数Range("B2").Interio筠续师诈r.Color,在监视窗口这行的数值就是颜色值,记录下颜色值:5276238
11、第六步,根据需要设置颜色这一步就可以根据需要设置颜色了,比如我要将F2方格设置成和B2颜色缬方焱蜱一样,就绺从萦米可以写一个SUB块,如下SubMacro2()Range("F2").Interior.Color=5276238EndSub
12、执行,会发现F2方格变得和B2颜色一样了