如何在Excel中仅将格式从一个范围复制到另一个范围？

当您只想复制某个范围中的单元格格式时，如何快速完成呢？ 本教程为您介绍了快速剪切，可让您轻松地仅复制格式。

仅在Excel中使用Format Painter复制格式

仅使用VBA复制格式

仅使用Kutools for Excel复制格式

---

仅在Excel中使用Format Painter复制格式

在Excel中，您只能使用 格式刷 工具。

1.选择一个范围，其中包含要复制的单元格格式。 看截图：

2.申请 格式刷 通过单击下面的 主页 标签，请参见屏幕截图：

3.选择一个空白单元格，然后单击它，仅粘贴单元格的格式。 看截图：

备注: 格式刷 也只能将格式复制到另一个工作表。

---

仅使用VBA复制格式

以下宏还可以帮助您仅复制单元格的格式。

1.按住 ALT 按钮并按下 F11 在键盘上打开一个 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页 > 模块，然后将VBA复制到模块中。

VBA：仅复制单元格格式：

Sub CopyFormat()
'Update 20130815
Dim CopyRng As Range, PasteRng As Range
xTitleId = "KutoolsforExcel"
Set CopyRng = Application.Selection
Set CopyRng = Application.InputBox("Ranges to be copied :", xTitleId, CopyRng.Address, Type:=8)
Set PasteRng = Application.InputBox("Paste to (single cell):", xTitleId, Type:=8)
CopyRng.Copy
PasteRng.Parent.Activate
PasteRng.PasteSpecial xlPasteFormats
Application.CutCopyMode = False
End Sub

3。 点击 运行 按钮或按下 F5 运行VBA。 屏幕上显示一个对话框，您应该选择要复制格式的单元格。 看截图：

4。 点击 Ok 此时将显示另一个对话框，供您选择要粘贴格式的单元格。 看截图：

6。 点击 Ok，然后将单元格的格式粘贴到所选单元格中。 看截图：

 备注：使用此VBA代码，您只能将格式粘贴到所需的其他工作表中。

---

仅使用Kutools for Excel复制格式

有 Kutools for Excel 安装好了 复制范围 功能可以帮助您快速轻松地仅复制单元格的格式。

Kutools for Excel, 与超过 300 方便的功能，使您的工作更加轻松。

免费下载 30天内免费提供全功能

安装后 Kutools for Excel，请执行以下操作:(立即免费下载Kutools for Excel！）

请申请 复制范围 通过单击功能 库工具 > 复制范围。 看截图：

1.选择要复制格式的单元格。

2。 点击 库工具 > 复制范围s，屏幕上显示一个对话框，检查 格式 选项下 特殊粘贴，请参见屏幕截图：

3.然后点击 确定。 显示另一个对话框，供您选择要粘贴结果的单元格。 看截图：

4。 点击 Ok，并且只有格式粘贴在所选单元格中。 看截图：

备注：您还可以在两个电子表格之间复制和粘贴单元格的格式。 如果您也要复制行高和列宽，则可以检查 包括行高 以及 包括列宽 框 复制多个范围 对话。

患有 Kutools for Excel' 复制范围，您也只能复制值，公式或注释。

  仅从范围复制格式

小费。如果您想根据颜色对单元格进行计数或求和，请尝试使用Kutools for Excel的 按颜色计数 如以下屏幕截图所示。 它在30天内无限制地提供完整功能， 请下载并立即免费试用。

按颜色计数

在某些情况下，您可能有多种颜色的提示，而您想要的是基于相同颜色来计算/求和值，如何快速计算？ 患有 Kutools for Excel's 按颜色计数，您可以按颜色快速进行许多计算，还可以生成计算结果的报告。

---

相关文章：

• 复制单元格中没有公式的数字
• 只将评论从单元格复制到另一个
• 复制单元格中的值和格式

---