将列E和G数据连接到列M

时间:2017-03-19 16:37:02

标签: vba

我想将我的数据从列E和G连接到列M,从第2行开始到变化(每月)行数

有点像m2 = e2& g2,直到没有数据要连接。

我正在寻找可能的答案但是,我仍然无法使用我在这里找到的所有代码,因为我刚刚开始学习VBA编码。在此先感谢您的帮助。 :)

1 个答案:

答案 0 :(得分:2)

如果您只想将两个单元连接在一起,则不需要使用VBA - 您可以在工作表中使用CONCATENATE工作表函数。大多数工作表函数可以通过附加“应用程序”在VBA中使用。对他们而言,CONCATENATE不是其中之一。为了在VBA中做你想做的事,你可以这样做:

Option Explicit

Sub concatColumns()
  With Worksheets(1)
    Dim lastRow As Integer, i As Integer
    lastRow = .Cells(.Rows.Count, "E").End(xlUp).row

    For i = 2 To lastRow:
      .Cells(i, "M") = .Cells(i, "E") & .Cells(i, "G")
      .Cells.NumberFormat = "@"
    Next
  End With
End Sub

以上假设您正在使用第一个工作表,并且还明确地将每个“M”列条目的格式更改为文本,以便excel不会自动格式化结果。