从多个单元格中选取值并将输出粘贴到一个单元格中

Pick values from multiple cells and paste output in one cell

我的数据集如下所示:

A   0.998315185
B   0.232720507
C   0.010558964
D   0.004246209
E   0.002552556

我想将下面的输出粘贴到一个单元格中:

0.998315185A+0.232720507B+0.010558964C+0.004246209D+0.002552556E

这样我就可以复制它并在其他地方使用它。

您可以试试这个用户自定义函数。在 sheet 的单元格中使用此函数,如下所示...

=CombineData(A1:B5)

用户自定义函数:

Function CombineData(ByVal Rng As Range) As String
Dim i As Long, j As Long
Dim str As String
Dim cell As Range
For i = 1 To Rng.Rows.Count
    For j = Rng.Columns.Count To 1 Step -1
        If str = "" Then
            str = Rng.Cells(i, j)
        Else
            str = str & Rng.Cells(i, j)
        End If
    Next j
    str = str & "+"
Next i
CombineData = str
End Function

使用较新的 TEXTJOIN 函数作为 数组公式 与 CSE。

=TEXTJOIN("+", TRUE, B2:INDEX(B:B, MATCH(1E+99, B:B))&A2:INDEX(A:A, MATCH(1E+99, B:B)))


¹ TEXTJOIN 与 Excel 2016 一起引入了以下版本:Excel 适用于 Android 手机,Excel 移动设备,Excel 2016 with Office 365,Excel 2016 for Mac,Excel Online,Excel for iPad,[= iPhone 30=] 和 Android 平板电脑 Excel。