将多个单元格合并为一行，并显示所有数据点。

我有一个单元格的范围D1-AS（这个范围根据月份变化），我想合并成一个单元格。 我也想这个单元格显示所有的数据点，而不用单击单元格。 我已经看了几个职位，但没有发现我的工作。 [单元格B6是我目前拥有的] [2]

Answer 1

我将使用CONCATENATE FOR ERICfunction：

= CONCATENATEFORERIC（D1：AS1）

可以使用function之前要插入的代码：

 Public Function CONCATENATEFORERIC(rng As Range) As String Dim rng1 As Range CONCATENATEFORERIC = "" For Each rng1 In rng CONCATENATEFORERIC = CONCATENATEFORERIC & rng1.Text Next rng1 End Function