EXCEL文字排列组合,将前三列每行中的文字排列组合,结果如最后一列。怎么弄? 50
展开全部
数据在Sheet1吧,鼠标右击Sheet1的标签【查看代码】在代码窗口粘贴下列代码:
Sub ouyangff()
For i = 2 To [a65536].End(3).Row
For j = 2 To [b65536].End(3).Row
For k = 2 To [c65536].End(3).Row
t = t + 1
Cells(t, 4) = Cells(i, 1) & "-" & Cells(j, 2) & "-" & Cells(k, 3)
Next
Next
Next
End Sub
按F5运行程序,按Alt + F11 回到Excel,去看看D列的结果吧!!!
Sub ouyangff()
For i = 2 To [a65536].End(3).Row
For j = 2 To [b65536].End(3).Row
For k = 2 To [c65536].End(3).Row
t = t + 1
Cells(t, 4) = Cells(i, 1) & "-" & Cells(j, 2) & "-" & Cells(k, 3)
Next
Next
Next
End Sub
按F5运行程序,按Alt + F11 回到Excel,去看看D列的结果吧!!!
来自:求助得到的回答
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
D2输入
=IF(ROW(A1)>COUNTA(A:A)*COUNTA(B:B)*COUNTA(C:C),"",INDIRECT("A"&INT((ROW(A1)-1)/(COUNTA(B:B)*COUNTA(C:C)))+1)&"-"&INDIRECT("B"&MOD(INT((ROW(A1)-1)/COUNTA(C:C)),COUNTA(B:B))+1)&"-"&INDIRECT("C"&MOD(ROW(A1)-1,COUNTA(C:C))+1))
下拉填充公式。
=IF(ROW(A1)>COUNTA(A:A)*COUNTA(B:B)*COUNTA(C:C),"",INDIRECT("A"&INT((ROW(A1)-1)/(COUNTA(B:B)*COUNTA(C:C)))+1)&"-"&INDIRECT("B"&MOD(INT((ROW(A1)-1)/COUNTA(C:C)),COUNTA(B:B))+1)&"-"&INDIRECT("C"&MOD(ROW(A1)-1,COUNTA(C:C))+1))
下拉填充公式。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
d2内输入
=a2&“-"&b2&"-"&c2下拉
=a2&“-"&b2&"-"&c2下拉
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询