vba获取单元的背景颜色

来源:互联网 发布:中国跳水最厉害的知乎 编辑:程序博客网 时间:2024/06/14 03:21
Sub 宏1()'' 宏1 宏''    'Cells(7, 2).Interior.ColorIndex    Worksheets("sheet1").Range("B1").Value = InteriorColor(Range("G2"))    End SubFunction InteriorColor(CellColor As Range)Application.VolatileInteriorColor = CellColor.Interior.ColorEnd Function

0 0
原创粉丝点击