如何将两列数据合并成一列

Q1：如何EXCEL文本两列合并成一列，数据不变和在一起

在C1输入=A1&B1，然后下拉复制到C列其他行，并选中C列--复制--选择性粘贴--数值，然后删除AB两列

Q2：如何将SPSS中两列数据相加合并成一列 如A1 A2 相加合并成新的一列 A3 2 1 3 1 4 5 3 3 6 5 2 7 2 3 5

最简单办法，把这两列数据拷贝到Excel中，用Excel的“&” 函数把两个单元格的内容合并为一个单元格。

Q3：如何将两列Excel 中的两列数据合并成一列，并且这两个数据之间用空格隔开

见截图

C1输入

=A1&" "&B1

公式下拉

Q4：EXCEL,怎么将两列数据合并成一列,不是简单的合并,是行数增加一倍

在需要得到A1值的任意单元格输入如下公式:
=OFFSET($A$1,INT(ROW(A1)/2-0.5),MOD(ROW(A1)-1,2))
或
=INDEX(A:B,INT((ROW(A1)/2)+0.5),MOD((ROW(A1)-1),2)+1)
下拉公式即得到你要的结果
如果是用VBA处理，宏代码如下
Sub 合并数据()
Dim arr, x&, arr1()
arr = Range("A1:B" & Range("A65536").End(xlUp).Row)
For x = 1 To UBound(arr)
For y = 1 To UBound(arr, 2)
i = i + 1、 ReDim Preserve arr1(1 To i)
arr1(i) = arr(x, y)
Next y
Next x
Columns("C:C").ClearContents
Range("C1").Resize(UBound(arr1), 1) = Application.Transpose(arr1)
End Sub
以上代码AB两列行数要求一样。以下代码不要求AB列的行数一样。
Sub 合并数据()
Dim arr, x&, arr1()
Columns("C:C").ClearContents
arr = Range("A1").CurrentRegion
For x = 1 To UBound(arr)
For y = 1 To UBound(arr, 2)
If arr(x, y) <> "" Then
i = i + 1、 ReDim Preserve arr1(1 To i)
arr1(i) = arr(x, y)
End If
Next y
Next x
Range("C1").Resize(UBound(arr1), 1) = Application.Transpose(arr1)
End Sub