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

时间:2017-06-27 20:08:00

标签: vba excel-vba copy-paste paste excel

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

我在数据标签上有粗体信息,当你索引某些内容时,你会丢失格式。通常,我可以创建一个VBA代码来复制/粘贴特殊格式(以保留粗体字),但格式化页面的性质意味着必须具有合并的单元格。我可以复制/粘贴信息,但不保留格式。如果我尝试粘贴特殊,我会收到错误“此操作要求合并的单元格大小相同”。

有没有办法粘贴并保留粗体文本而不会取消格式化的图纸?

1 个答案:

答案 0 :(得分:0)

您可以这样做:

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

这将把字体样式传输到数据单元格到目标单元格,无论单元格是否合并。