读书人

请高手帮忙!解决思路

发布时间: 2012-03-22 17:43:57 作者: rapoo

请高手帮忙!!
小弟新手想请教高手们!
怎么把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 

读书人网 >VBA

热点推荐