Vba 从单个单元格复制/粘贴带格式的单元格到合并单元格

我有一张多页的Excel表格。两个页面中的一个是“数据”选项卡，有一长串名称，然后是几列数据。（单元格A1-F1是标题，A2-A20被命名，B2-F20是关于每个名称的不同数据段）。第二页从数据选项卡中提取特定数据（索引函数）

我在“数据”选项卡上用粗体显示了信息，当您为某些内容编制索引时，您将丢失格式。通常，我可以创建一个VBA代码来复制/粘贴特殊格式（以保留粗体字），但格式页面的性质意味着它必须有合并的单元格。我可以复制/粘贴信息，但不保留格式。如果我尝试粘贴特殊，我会得到错误“此操作要求合并的单元格大小相同”

---

有没有一种方法可以粘贴并保留粗体文本，而不合并格式化的工作表？

您可以执行以下操作：

Worksheets("Sheet2").Range("A1").Value = Worksheets("Sheet1").Range("A1").Value
Worksheets("Sheet2").Range("A1").Font.FontStyle = Worksheets("Sheet1").Range("A1").Font.FontStyle

---

无论单元格是否合并，这都会将字体样式从数据单元格传输到目标单元格。

您唯一担心的是粗体吗？是的，粗体是我唯一需要传输的格式化内容。唯一棘手的部分是区分格式化工作表上的数据，有一个索引函数可以查看标题（我更改了标题）并根据标题更改搜索信息。您知道这是否仍然有效吗？是的，您只需要知道包含数据的单元格以及合并单元格的左上角单元格。如果你在获取手机时遇到困难，用你正在尝试的代码问一个新问题。谢谢，我会马上告诉你。