当工作表中包含大量多单元格数组公式时,有时为了方便编辑这些数组公式,可能希望将工作表中的数组公式单独标记出来,以区分非数组公式,这时可以用下面的VBA代码来实现。

选择包含数组公式的工作表,按Alt+F11,打开VBA编辑器,在右侧代码窗口中输入下列代码:

Sub ColorArray()
Dim rCell As Range
For Each rCell In ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas)
If rCell.HasArray Then rCell.Interior.ColorIndex = 37
Next rCell
End Sub

运行上述代码,活动工作表中所有包含数组公式的单元格就会用浅蓝色标记出来。

版权声明

本文仅代表作者观点,不代表本站立场。
本站资源均来自互联网整理,版权归原作者所有,切勿用作非法使用和未经授权的商用,因此带来的法律风险与本站无关。

本文链接:http://www.chousj.cn/exceljc/861.html

发表评论

评论列表(0人评论 , 39人围观)
☹还没有评论,来说两句吧...

免费资源分享网_电脑操作教程_免费源代码下载_免费字体下载_高清电脑壁纸

http://www.chousj.cn/

| 渝ICP备15004826号

Powered By

使用手机软件扫描微信二维码

关注我们可获取更多热点资讯