当前位置: 代码迷 >> VBA >> 请好手帮忙!
  详细解决方案

请好手帮忙!

热度:4938   发布时间:2013-02-26 00:00:00.0
请高手帮忙!!
小弟新手想请教高手们!
怎么把A1,A2,A3,A4的值显示在A5中。
B1,B2,B3,B4的值显示在B5中
     .....
一直到
F1,F2,F3,F4的值显示在F5中

请高手们教教我怎么写代码·
------解决方案--------------------------------------------------------

Sub test()
    Dim objAWS As Worksheet
    Set objAWS = Application.ActiveSheet
    For i = 1 To 5
        objAWS.Cells(i, 5).Text = objAWS.Cells(i, 1) & objAWS.Cells(i, 2) & objAWS.Cells(i, 3) & objAWS.Cells(i, 4)
    Next i

End Sub

  相关解决方案