请高手帮忙！解决思路

请高手帮忙！！
小弟新手想请教高手们！
怎么把A1,A2,A3,A4的值显示在A5中。
B1,B2,B3,B4的值显示在B5中
  .....
一直到
F1,F2,F3,F4的值显示在F5中

请高手们教教我怎么写代码·

[解决办法]

VB code

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 iEnd Sub