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

在工作表中，行高和列宽的默认单位是预设的，默认列宽为 8.38 个字符，默认行高为 12.75 磅。在 Excel 中，很难直接以英寸或厘米为单位设置行高或列宽。但有时出于某些目的，您需要将高度和宽度更改为厘米。该如何解决这个问题呢？

使用 VBA 代码将单元格大小设置为厘米 (cm)

使用 Kutools for Excel 将单元格大小设置为厘米 (cm)

使用 VBA 代码将单元格大小设置为厘米 (cm)

除了使用 VBA 代码外，您无法通过 Excel 的功能以厘米为单位设置高度和宽度。以下两个代码可以帮助您设置列宽和行高。操作步骤如下：

1. 选择要以厘米为单位设置的单元格。

2. 单击 开发工具 > Visual Basic，会弹出一个新的 Microsoft Visual Basic for Applications 窗口，单击 插入 > 模块，并将以下代码输入到模块中：

用于设置行高（以厘米为单位）的代码：

Sub RowHeightInCentimeters()
Dim cm As Single
cm = Application.InputBox("Enter Row Height in Centimeters", _
"Row Height (cm)", Type:=1)
If cm Then
Selection.RowHeight = Application.CentimetersToPoints(cm)
End If
End Sub

3. 然后点击 按钮执行代码。此时会弹出一个提示框，要求您输入行高的数值。参见截图：

备注：您输入的数字必须小于 15。如果您在此对话框中输入 0，此 VBA 代码不会更改行高。

4. 单击 确定。所选单元格的行高已设置为 2 厘米。参见截图：

如果要以厘米为单位设置列宽，可以输入以下代码：

用于设置列宽（以厘米为单位）的代码：

Sub ColumnWidthInCentimeters()
Dim cm As Single, points As Integer, savewidth As Integer
Dim lowerwidth As Integer, upwidth As Integer, curwidth As Integer
Dim Count As Integer
Application.ScreenUpdating = False
cm = Application.InputBox("Enter Column Width in Centimeters", _
"Column Width (cm)", Type:=1)
If cm = False Then Exit Sub
points = Application.CentimetersToPoints(cm)
savewidth = ActiveCell.ColumnWidth
ActiveCell.ColumnWidth = 255
If points > ActiveCell.Width Then
MsgBox "Width of " & cm & " is too large." & Chr(10) & _
"The maximum value is " & _
Format(ActiveCell.Width / 28.3464566929134, _
"0.00"), vbOKOnly + vbExclamation, "Width Error"
ActiveCell.ColumnWidth = savewidth
Exit Sub
End If
lowerwidth = 0
upwidth = 255
ActiveCell.ColumnWidth = 127.5
curwidth = ActiveCell.ColumnWidth
Count = 0
While (ActiveCell.Width <> points) And (Count < 20)
If ActiveCell.Width < points Then
lowerwidth = curwidth
Selection.ColumnWidth = (curwidth + upwidth) / 2
Else
upwidth = curwidth
Selection.ColumnWidth = (curwidth + lowerwidth) / 2
End If
curwidth = ActiveCell.ColumnWidth
Count = Count + 1
Wend
End Sub

使用 Kutools for Excel 将单元格大小设置为厘米 (cm)

通过上述代码，您只能以厘米为单位设置单元格大小。今天，我将向您介绍一款多功能工具——Kutools for Excel，它不仅可以以厘米为单位设置单元格大小，还可以以英寸、磅和像素为单位进行设置。

安装 Kutools for Excel 后，请按照以下步骤操作：（立即免费下载 Kutools for Excel！）

1. 选中要以厘米为单位设置的单元格。

2. 单击 Kutools > 格式 > 调整单元格大小，参见截图：

3. 在“调整单元格大小”对话框中，选择所需的 单位类型，并从 设置数值 部分指定 行高 和 列宽。参见截图：

4. 然后单击 确定 或 应用。您将获得行高为 2 厘米、列宽为 3 厘米的单元格。

演示：使用 Kutools for Excel 将单元格大小设置为厘米 (cm)

相关文章：

为某个区域设置列宽和行高

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