小编use*_*267的帖子

我只想用数字突出显示单元格.此宏还突出显示带有文本的单元格.

Sub high()
    Dim ws As Worksheet
    Dim yourrange As Range

    Set ws = ActiveSheet

    For Each yourrange In ws.Cells.SpecialCells(xlCellTypeConstants)
        yourrange.Interior.Color = 65535
    Next yourrange
End Sub