1、第一步,设置颜色EXCEL中找两个方格,B2、D2,随机找个颜色赋给B2
2、选择颜色
3、改变后的颜色
4、第二步,录制宏录制一个宏,内容是把颜色1(B2)用格式刷刷给颜色2(D2)点击录制
5、把颜色1(B2)用格式刷刷给颜色2(D2)
6、第三步,查看宏代码代码如下*******************代码↓**********涯箨唁峦**********Sub Macro1()'' Macro1 Macro&垆杪屑丝#39;' Range("B2").Select Application.CutCopyMode = False Selection.Copy Range("D2").Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Application.CutCopyMode = FalseEnd Sub*******************代码↑********************但是代码中并未出现颜色,这就要用到调试了
7、第四步,调试在代码区按F8,进入单步调试
8、待黄色箭头走到Range("B2").Select这一句的下一行,在监视窗口下右击->添加监视
9、在弹出的对话框,输入Range("B2")
10、第五步,找到颜色参数找到颜色参数Range("B2").Interio筠续师诈r.Color,在监视窗口这行的数值就是颜色值,记录下颜色值:5276238
11、第六步,根据需要设置颜色这一步就可以根据需要设置颜色了,比如我要将F2方格设置成和B2颜色一样,就可以写一个SUB块,如下Sub Macro2() Range("F2").Interior.Color = 5276238End Sub
12、执行,会发现F2方格变得和B2颜色一样了