连接备用列

时间:2012-04-06 06:53:20

标签: excel vba excel-vba

我在列中有10,000行和无限数据。相邻列中的两个参数在13个不需要的列之后重复。

我希望连接由空格

分隔的行的这些相邻列

例如:

串连(B2,C2 “”,P2,Q2, “”,AC,AD, “”,....)

但我不知道数据存在哪一列。

你能建议我一个宏,它将数据连接到一行的一个单元格中的空白列,并且对于前10,000行继续相同。 非常感谢您的帮助!

1 个答案:

答案 0 :(得分:2)

首先,所有行都在同一列终止?即每行是否在AD列中有数据而不是AE?

如果上述答案为“是”,那么您可能需要查看:

Range.End()

使用如下:

YourSheet.Range(YourRange).End(xlToRight).Column

see here for more info

这将返回

  • 包含数据的最后列(当起始单元格包含数据时)

  • 带有数据的第一个列(当起始单元格为空时)。
    • 最后一列没有数据!

根据问题中的示例,您的范围可能从B列,P,AC等开始。

如果上面的答案是'不',那么你可以使用类似的功能,但你必须遍历每一行...

相关问题