VBA代码来突出特定的空白单元格

我希望有人能够帮助我一些代码来突出特定范围内的空单元格,我发现在网站上类似的话题,但我不能让他们为我的情况工作,可能是由于我的VBA缺乏经验,或者他们可能是错误的出发点。

我有一个用户需要完成的types表单,我想确保一旦他们完成了所有领域的所有问题,然后才能查看他们的结果,那么需要完成的单元格在位置而不是在一个简单的范围,我也有空行和列出于美学原因,所以我显然不希望包括他们突出显示他们是空白的。

我有代码将光标移动到需要答案的下一个单元格,因此完成时我想要代码运行以检查空白,突出显示红色边框并popup一个消息框请求他们完成所有字段,并然后在字段完成后删除红色边框。

这是我的细胞范围的一部分,我想包括E5,E7,H5,H7,L5,L7,J11,因为你可以看到他们有点随意。

希望这一切都是有道理的,你们中的一个很棒的人可以帮助我

非常感谢

Twaddy

用这个

Sub test() Dim oCell As Range, Trigger% Trigger = 0 For Each oCell In [E5,E7,H5,H7,L5,L7,J11] If oCell.Value = Empty Then With oCell.Borders .LineStyle = xlContinuous .Color = vbRed End With Trigger = Trigger + 1 Else oCell.Borders.LineStyle = xlNone End If Next If Trigger = 1 Then MsgBox "Mandatory field not filled" ElseIf Trigger > 1 Then MsgBox "Mandatory fields (" & Trigger & ") not filled" End If End Sub