如何在Excel中自动为具有内容的单元格创建边框？

在Excel中，我们经常需要对单元格进行格式设置，其中就包括创建边框。手动一个个创建边框的方法虽然可行，但实际上非常耗时，尤其在处理大量数据时更是如此。因此，我们希望能够找到一种自动化创建边框的方法。

在下面的文章中，我们将介绍三种不同的方法来实现这个目标。

方法一：使用Excel自带的条件格式

Excel提供了一种条件格式，可以在单元格上自动创建边框。具体的操作步骤如下：

选择需要添加边框的单元格范围；
选择“开始”面板上的“条件格式”下拉菜单；
选择“新建规则”选项，然后选择“使用公式确定要设置格式的单元格”；
在“公式”栏中输入以下公式：=LEN(TRIM(A1))>0（其中A1是单元格的引用，可以根据实际情况进行修改）；
点击“格式”按钮，选择“边框”选项卡；
选择所需的边框样式和颜色，然后单击“确定”；
单击“确定”关闭“新建格式规则”对话框。

通过以上步骤，我们就可以自动地为具有内容的单元格添加边框了，

方法二：使用VBA自动创建边框

如果我们需要在多个工作表上自动创建边框，则使用VBA会更加便捷。具体的代码如下：

Sub AddBorders()
    Dim targetRange As Range
    For Each targetRange In ActiveSheet.UsedRange.Cells
        If targetRange.Value <> "" Then
            targetRange.BorderAround xlContinuous, xlMedium, xlColorIndexAutomatic
        End If
    Next targetRange
End Sub

这段代码会遍历当前活动工作表（ActiveSheet）中的所有单元格，对于非空单元格，会自动为其添加边框。在处理完成后，我们可以在某个单元格中运行该代码，或者把代码放入特定的模块中并添加一个快捷键，以方便日常使用。