☰

如何在excel中实现自定义合并？

tag-icon • tag-icon microsoft-excel
如何在excel中实现自定义合并？

我只知道 Excel 的基本知识。我从客户那里得到了一份巨大的 Excel 表。我试图用示例数据解释我想要什么。这是一张表中的输入数据

在此处输入图片描述

我想要的是- 我在新工作表中（或在某些文本文件或 Excel 中）输入行号，例如任何格式的行号，Row2:Row3:Row4然后合并这三行，如下所示

  1. 保持A2的内容不变。
  2. 将B1,B2,B3的内容合并到B2下
  3. 将 A3 和 A4 的内容移到 C1 列下。如果可能的话，这一步是很好的，但不是强制性的

输出截图

在此处输入图片描述

我不确定如何实现这一点？可以通过宏、公式或其他方法实现吗？

答案1

我认为这是一个很好的机会，给你钓鱼竿并教你 VBA 中的两种基本方法。

将两个单元格合并为一个

如果我有两个包含数据的单元格：

在此处输入图片描述

您始终可以通过以下格式引用单元格的内容：

ThisWorkbook.Sheets(worksheet_name).Range(desirded_range).Value

您可以在其中输入工作表名称和范围。此方法可用于读取从一个单元格，以及写作到单元格。因此，在上面的示例中，我将使用：

Public Sub combine()
    ThisWorkbook.Sheets("Sheet1").Range("A1").Value = ThisWorkbook.Sheets("Sheet1").Range("A1").Value & ThisWorkbook.Sheets("Sheet1").Range("A2").Value
End Sub

请注意我如何引用范围 A1 来读取它以及如何向其分配数据。

合并

对我的数据使用相同示例：

在此处输入图片描述

为了合并，我们使用以下格式：

ThisWorkbook.Sheets(worksheet_name).Range(desired_range).Merge

这与合并示例非常相似。请记住期望范围可以是一个范围，而不必是单个单元格，因此在我的示例中合并我只需使用：

Public Sub Merge()
    ThisWorkbook.Sheets("Sheet1").Range("A1:A2").Merge
End Sub

相关内容