Excel VBA-构建一个函数以高亮显示超出字符限制的单元格
我在excel工作表中有一列有字符限制。我希望能够按下一个活动的X命令按钮,并使该功能突出显示所有超过字符限制的单元格。例如,如果字符限制为3,则会突出显示名称标记,但不会突出显示名称Joe。有人知道怎么做吗 这就是我现在拥有的,但它不起作用。我是个新手Excel VBA-构建一个函数以高亮显示超出字符限制的单元格,vba,excel,character,counting,Vba,Excel,Character,Counting,我在excel工作表中有一列有字符限制。我希望能够按下一个活动的X命令按钮,并使该功能突出显示所有超过字符限制的单元格。例如,如果字符限制为3,则会突出显示名称标记,但不会突出显示名称Joe。有人知道怎么做吗 这就是我现在拥有的,但它不起作用。我是个新手 Private Sub CommandButton1_Click() For i = 2 To 5 If Len(Cells(i, 1).Value) > 2 Then Cells(1, 1).Interior.ColorIndex
Private Sub CommandButton1_Click()
For i = 2 To 5
If Len(Cells(i, 1).Value) > 2 Then
Cells(1, 1).Interior.ColorIndex = 200
End If
Next i
End Sub这对我很有用。我认为问题可能在于您的代码行:
Cells(1, 1).Interior.ColorIndex = 200
应该是
Cells(i, 1).Interior.ColorIndex = 200
见下文:
For i = 2 To 5
If Len(Sheet1.Cells(i, 1).Value) > 2 Then
Sheet1.Cells(i, 1).Interior.ColorIndex = 37
End If
Next i
不用VBA,只需使用Excel的内置
使用公式确定要格式化的单元格
=LEN(E4)>2
(公式基于下面的示例),然后单击Format
,用您选择的颜色填充单元格Len(“Joe”)>2
则您可以对“Mark”执行相同的操作。