☰

Excel 如何获取两个用逗号分隔的数据的独立单元格并将它们配对？

tag-icon • tag-icon microsoft-excel worksheet-function vba
Excel 如何获取两个用逗号分隔的数据的独立单元格并将它们配对？

我到处寻找这个问题的答案，但似乎没有任何答案。

我有类似的东西：

Cell B1:    01/01/2014,01/02/2014, 01/03/2014, 01/04/2014, 01/05/2014, 01/06/2014, 01/07/2014, 01/08/2014, 01/09/2014, 01/10/2014

Cell B2:    10.00,11.00,12.00,13.00,14.00,15.00,16.00,17.00,18.00,19.00

现在我需要一些东西来获取这些值，并像这样立即将它们配对.....

Cell B3: 01/01/2014 10.00, 01/02/2014 11.00, 01/03/2014 12.00...etc.

现在单元格 B1 中的日期会根据输入的内容而变化，因为它是客户交易日期，而 B2 中的日期会一直变化，因为它是那些客户的交易金额。有人知道如何以最简单的方式将它们匹配吗？

一旦我将其像这样配对（即 2014 年 1 月 1 日 10.00、2014 年 1 月 2 日 11.00 等），我就需要将结果单元格轻松地从 Excel 中拉出并放入电子邮件模板中（所有这些都已经设计好并可以工作，只需要进行配对的功能。

我感谢任何知道如何做到这一点的人！！！

答案1

为什么不把数据分开呢？选择 B 列，然后转到数据选项卡 - 文本到列 - 分隔符 - 逗号

现在将其放入 B3=Concatenate(B1," ",B2)并拖动过去。

现在它们已配对。如果你想让它们重新配对，请concatenate再次使用。

宏

Sub test()
Dim arrdate As Variant
Dim arrtime As Variant
Dim strcombo As String

arrdate = Split(Range("B1"), ",")
arrtime = Split(Range("B2"), ",")
strcombo = arrdate(0) & " " & arrtime(0) & ", "

For i = 1 To UBound(arrdate)
    strcombo = strcombo & arrdate(i) & " " & arrtime(i) & ", "
Next i
Range("b3") = strcombo
End Sub

相关内容