使用VBA将所有单元格与数据边界，没有边界的所有单元格都没有数据

Question

我有来自A4格式的数据：E2000。 我想要做的是边界包含数据的范围（A4：E2000）。但是，包含数据的范围单元格是随机的。所以我不想在代码中使用修复范围。

此外，没有数据的其余单元格设置为无边框。

如何使用VBA执行此操作？

Answer 1

您可以使用更简单的条件格式来实现此目的。您将需要三个条件格式规则。转到条件格式==＆gt;新规则==＆gt;使用公式。 分别为每个条件输入此公式。

第一条规则：=AND(A3="",A4<>"")适用于范围=$A$4:$E$2000。在格式化选项下，选择Upper边框。

第二条规则：=AND(A5="",A4<>"")适用于范围=$A$4:$E$2000。在格式化选项下，选择Bottom边框。

第三条规则：=AND(B4="",A4<>"")适用于范围=$A$4:$E$2000。在格式化选项下，选择Right边框。

结果如下所示。如果您还想添加左边框，请使用与上面相同的逻辑。