1.如下图，如果在B列有个体的省份，C列有市，D列有县，现在在E列地址中生成详细地址，只要将BCD列的内容合并到一起就可以啦。
2.用公式法合并：将鼠标点击E2单元格——点击函数——点击选择类别下拉箭头——点击文本——点击“concatenate”——点击“确定”。
3.在“函数参数”里,光标在"text1”中时点击B2单元格；光标在"text2”中时点击C2单元格；光标在"text3”中时点击D2单元格——点击“确定”。
4.鼠标点击E2单元格，在将鼠标移到单元格的右下角，鼠标呈现实心十字架是，从上向下拖动鼠标，这就完成了对格式的复制。对将前面几列合并到一列单元各中了。
温馨提示：答案为网友推荐，仅供参考
第1个回答 2014-03-11
你需要吧A列空出来.
按下alt+f11，点选你操作的工作表，把下面代码复制进去
Sub huizong()
Dim sh As Range
Dim i, j As Integer
i = 1
j = Sheet1.Range("a65536").End(xlUp).Row
Sheet1.Range("a1:a" & j).ClearContents
For Each sh In Range("a1:l20")
If sh.Value <> "" Then
Cells(i, 1) = sh.Value
i = i + 1
End If
Next
End Sub
按下F5运行，a1:l20这个区域你自己修改，在A列中生成你要的效果。本回答被网友采纳
按下alt+f11，点选你操作的工作表，把下面代码复制进去
Sub huizong()
Dim sh As Range
Dim i, j As Integer
i = 1
j = Sheet1.Range("a65536").End(xlUp).Row
Sheet1.Range("a1:a" & j).ClearContents
For Each sh In Range("a1:l20")
If sh.Value <> "" Then
Cells(i, 1) = sh.Value
i = i + 1
End If
Next
End Sub
按下F5运行，a1:l20这个区域你自己修改，在A列中生成你要的效果。本回答被网友采纳
第2个回答 2014-03-11
=INDIRECT(TEXT(SMALL(ROW($A$1:$E$5)*10+COLUMN($A$1:$E$5),ROW(1:1)),"r0c0"),)
公式是这样，自己去改范围。
公式是这样，自己去改范围。
第3个回答 2014-03-11
请把表格发过来，录制个动画给你。
第4个回答 2014-03-11
数据顺序没关系吗？
相似回答