郑老师:刚才讲的一个延伸,就是如何实现 源单元格的颜色一变,那么选定单元格的颜色就随之而变。也就是所指的自动化,谢谢!
![]() ![]() 学习达人
|
chj6533
展开
郑老师:刚才讲的一个延伸,就是如何实现 源单元格的颜色一变,那么选定单元格的颜色就随之而变。也就是所指的自动化,谢谢! zjlsgjp
展开
@ chj6533 Private Sub CommandButton1_Click() Range("I3:M3").Interior.Color = Selection.Interior.Color Range("I2:M3").Select Selection.Copy Range("I4:M12").PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False End Sub 在源单元格之外做一个按钮,在按钮里输入代码就可以。 |
|
|
且行且止123
展开
|
本站有权保留或删除有争议评论。 参与本评论即表明您已经阅读并接受上述条款。