excel 用vba合并单元格
请高手指点下,用vba合并相邻的两个单元格,怎么实现,例如abcdefg12345我想要批量合并上面表中的单元格,合并的方法是把a1和b1合并,c1和c2合并,依次往下。...
请高手指点下,用vba合并相邻的两个单元格,怎么实现,例如
a b c d e f g
1
2
3
4
5
我想要批量合并上面表中的单元格,合并的方法是把a1和b1合并,c1和c2合并,依次往下。
然后a2和b2.......
请高手指点!!!
谢谢一楼答案,又学一招,不过vba有这样的方法吗?
是这样的:
第一行a1&b1 c1&d1 e1&f1。。。。。。。。
第二行a2&b2 c2&d2 e2&f2。。。。。。。。
。
。
。
第n行an&bn cn&dn en&fn。。。。。。。。
不知道我这样说是否明白 展开
a b c d e f g
1
2
3
4
5
我想要批量合并上面表中的单元格,合并的方法是把a1和b1合并,c1和c2合并,依次往下。
然后a2和b2.......
请高手指点!!!
谢谢一楼答案,又学一招,不过vba有这样的方法吗?
是这样的:
第一行a1&b1 c1&d1 e1&f1。。。。。。。。
第二行a2&b2 c2&d2 e2&f2。。。。。。。。
。
。
。
第n行an&bn cn&dn en&fn。。。。。。。。
不知道我这样说是否明白 展开
2个回答
展开全部
VBA一定可以,不过你没说清楚 a1和b1合并,c1和c2合并 然后a2和b2....... 后面是寸 C2和C3吗?C2已经和C1合并了
是 A1&B1 C1&C2 A2&B2 A3&B3 C3&C4 A4&B4 ?
知道了
Sub Macro2()
'
' Macro2 Macro
'
Dim X As Integer, Y As Integer
X = 10 '你要合并多少列 2 是ABCD 5 是ABCDEFGHIJ合并
Y = 30 '多少行
For J = 1 To Y: For I = 1 To X: Range(Cells(J, I + I - 1), Cells(J, I + I)).MergeCells = True: Next I, J
End Sub
是 A1&B1 C1&C2 A2&B2 A3&B3 C3&C4 A4&B4 ?
知道了
Sub Macro2()
'
' Macro2 Macro
'
Dim X As Integer, Y As Integer
X = 10 '你要合并多少列 2 是ABCD 5 是ABCDEFGHIJ合并
Y = 30 '多少行
For J = 1 To Y: For I = 1 To X: Range(Cells(J, I + I - 1), Cells(J, I + I)).MergeCells = True: Next I, J
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |