Excel VBA-构建一个函数以高亮显示超出字符限制的单元格

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

我在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 = 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的内置

  • 选择您的范围
  • 单击Alt+O,D以打开条件格式规则管理器
  • 单击“新建规则”
  • 选择
    使用公式确定要格式化的单元格
  • 输入公式
    =LEN(E4)>2
    (公式基于下面的示例),然后单击
    Format
    ,用您选择的颜色填充单元格
  • 最终结果将与下面的屏幕截图相似,除了您需要的范围
  • 如果
    Len(“Joe”)>2
    则您可以对“Mark”执行相同的操作。