0

我在 excel 中有数据,长度在 5-6 个单元格之间变化,中间有 3 个空格。

我希望将所有数据分组:

  1. 邮寄至:
  2. X
  3. X
  4. X
  5. x - 也许;这并不总是在这里
  6. 澳大利亚

因此,每个 POST TO: 实例之间的所有数据:然后是下一个 AUSTRALIA,合并到 1 个单元格中。如何才能做到这一点?

数据从 B4 开始

完成后,我将运行一个预先录制的宏来获取该数据并将其粘贴到我在 MS Word 中的标签模板中,然后打印出来。

4

2 回答 2

0

假设它从 B4 单元格开始

如果您需要 B10 中的简单配方

= B15 & " " &B16 & " " & B17 & " " &B18 &" " & B19 & " " & B20

或在 VBA 中 .. 将您的按钮设置为 Sub Test ..

Sub Test()
ConcatIt Range("B4")
End Sub

Sub ConcatIt(pos As Range)
Dim x, y As Integer
x = pos.Column
y = pos.Row
Cells(y + 6, x) = Cells(y, x) & " " & Cells(y + 1, x) & " " & Cells(y + 2, x) & " " & Cells(y + 3, x) & " " & Cells(y + 4, x) & " " & Cells(y + 5, x)
End Sub
于 2013-06-24T00:27:04.523 回答
0

如果您只想连接行,您可以执行以下操作:

Range("a1").Value = Join(WorksheetFunction.Transpose(Range("b1:b6")), Chr(9))
于 2013-06-24T00:38:29.823 回答