如何在 Excel 中将单元格设置为正方形？

有时，您可能需要在工作表中使用正方形的单元格来有效地创建流程图或房屋平面图。然而，由于行高和列宽采用不同的单位进行测量，因此将单元格调整为正方形可能会比较困难。本文将为您提供一些实用技巧，帮助您均匀调整这两个维度，从而更轻松地在 Excel 电子表格中实现正方形单元格。

• 通过调整行高和列宽使多个单元格变为正方形
• 使用 Kutools for Excel 轻松将单元格设置为正方形
• 使用 VBA 代码将多个单元格设置为正方形

通过调整行高和列宽使多个单元格变为正方形

要在 Excel 中将单元格调整为正方形，您可以按照以下步骤调整列宽和行高：

1. 选择要将其设置为正方形的单元格。要将当前工作表中的所有单元格设置为正方形，请按“Ctrl” + “A”以选择所有单元格。
2. 在“开始”选项卡下，选择“格式” > “行高”。

   

3. 在“行高”对话框中，将行高更改为“72”，然后单击“确定”保存更改。

   

4. 通过选择“格式” > “列宽”打开列宽对话框。
5. 在“列宽”对话框中，将默认数字更改为“12”，然后单击“确定”保存更改。

   

所选单元格现在为正方形。

使用 Kutools for Excel 将多个单元格设置为正方形

使用上述方法，由于测量单位不同（行高以点为单位，而列宽以字符为单位），实现完美的正方形单元格可能会比较困难。这就是为什么我们强烈推荐使用“Kutools”的“调整单元格大小”功能。此工具提供四种单位类型，允许您将行高和列宽设置为相同的值，从而轻松使所选单元格变为正方形。

安装“Kutools for Excel”后，选择“Kutools” > “格式” > “调整单元格大小”以启用此功能。

选择要调整大小的单元格，然后指定所需的单位类型，勾选“行高”和“列宽”复选框并输入相同的值，最后单击“确定”保存设置。

现在，所选范围内的所有单元格均为正方形。

使用 VBA 代码将多个单元格设置为正方形

如果您想以英寸为单位调整单元格大小，以下 VBA 代码可以帮助您完成任务。

1. 选择要将其设置为正方形的单元格。
2. 按“Alt” + “F11”打开代码编辑器。单击“插入” > “模块”，然后在模块中输入以下代码：

   Sub MakeSquare()
   'Updated by Extendoffice 2024/07/15
   Dim WPChar As Double
   Dim DInch As Double
   Dim Temp As String
   Temp = InputBox("Height and width in inches?")
   DInch = Val(Temp)
   If DInch > 0 And DInch < 2.5 Then
   For Each c In ActiveWindow.RangeSelection.Columns
   WPChar = c.Width / c.ColumnWidth
   c.ColumnWidth = ((DInch * 72) / WPChar)
   Next c
   For Each r In ActiveWindow.RangeSelection.Rows
   r.RowHeight = (DInch * 72)
   Next r
   End If
   End Sub

3. 按“F5”运行代码。当输入对话框出现时，输入一个数字以同时设置行高和列宽，然后单击“确定”。

   

所选单元格现在为正方形。

相关文章：

• 如何在 Excel 中以厘米 (cm) 为单位设置单元格大小？