EXCEL VBA在列C:O中找到所有空白单元格,然后将它们涂成红色

时间:2016-09-01 08:22:18

标签: excel vba excel-vba

如果一个单元格是空的,我需要用红色填充它(colorindex = 3) 范围是C6:O735。

我尝试了这段代码但是没有用。

@Html.TextBoxFor(model => model.Time, null, new { type = "number"})

另外,例如单元格K89是空的,那么我想用红色填充那个空单元格和同一行的A89。

目的是当您转到A列并过滤红色单元格时,您可以看到所有具有空单元格的列。

非常感谢任何帮助。

1 个答案:

答案 0 :(得分:1)

但是如果你想在VBA中这样做,那么你可以试试这个:

Sub Lege_Cellen()
    Dim myRange As Range,cel As Range
    Set myRange = Sheet1.Range("C6:O735")

    For each cel in myRange 
      if Trim(cel.value) = "" then cel.Interior.ColorIndex = 3
    Next cel
End Sub