excel怎么把两列数据筛选后合并

在Excel中，把两列数据筛选后合并的方法有多种，包括使用公式、功能和VBA宏。具体方法包括：使用“筛选功能”、使用“合并与居中”、使用“&符号或CONCATENATE函数”、使用“Power Query”、使用VBA代码。其中，使用“筛选功能”和“合并与居中”是最常用的方法。以下是详细描述如何使用“筛选功能”来合并两列数据。

使用Excel的筛选功能，你可以先筛选出需要的数据，然后再用合并功能将数据合并。例如，你可以先使用Excel的筛选功能来筛选出需要的数据，然后用“&符号或CONCATENATE函数”来合并这些数据。

一、筛选功能

打开Excel文件，选择需要筛选的列。
点击“数据”选项卡，然后点击“筛选”按钮。
在每一列的标题上会出现一个下拉箭头，点击箭头并选择你需要的数据条件。
选择完条件后，筛选出的数据将会显示在表格中。

二、合并两列数据

一、使用“合并与居中”

“合并与居中”功能适用于将数据合并到一个单元格中。以下是具体步骤：

选择数据范围： 首先，选择要合并的两个列数据。可以按住Shift键并点击每列的开头单元格，然后拖动鼠标选择整列。
点击“合并与居中”： 在“开始”选项卡中，点击“合并与居中”按钮。这样，所选区域的所有数据将合并到一个单元格中，并居中显示。

二、使用“&符号或CONCATENATE函数”

“&符号”和“CONCATENATE函数”可以合并两个或多个单元格的数据到一个单元格中。以下是具体步骤：

使用“&符号”：
- 在目标单元格中输入公式，例如：=A1 & B1。这个公式将合并A1和B1单元格中的数据。
- 将公式复制到整列，以合并所有行的数据。
使用“CONCATENATE函数”：
- 在目标单元格中输入公式，例如：=CONCATENATE(A1, B1)。
- 将公式复制到整列，以合并所有行的数据。

三、使用Power Query

Power Query是Excel中的一种强大工具，可以用于数据整理和合并。以下是具体步骤：

加载数据到Power Query：
- 选择数据范围，点击“数据”选项卡，然后点击“从表格/范围”。
- 在弹出的Power Query编辑器中，可以看到数据表。
合并列：
- 选择需要合并的两列，点击右键选择“合并列”。
- 选择合并的分隔符（例如，空格、逗号等），然后点击“确定”。
加载数据到工作表：
- 完成合并后，点击“关闭并加载”，将数据加载回Excel工作表。

四、使用VBA代码

如果你对编程有一定了解，可以使用VBA代码来自动化合并过程。以下是一个简单的VBA代码示例：

Sub MergeColumns()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sheet1") ' 修改为你的工作表名称
    Dim lastRow As Long
    lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row ' 获取最后一行
    Dim i As Long
    For i = 1 To lastRow
        ws.Cells(i, "C").Value = ws.Cells(i, "A").Value & " " & ws.Cells(i, "B").Value ' 合并A列和B列数据到C列
    Next i
End Sub

五、自动筛选和合并

有时候，你可能需要自动化筛选和合并过程。以下是一个使用VBA实现自动筛选和合并的示例：

Sub AutoFilterAndMerge()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sheet1") ' 修改为你的工作表名称
    ' 清除之前的筛选
    If ws.AutoFilterMode Then ws.AutoFilterMode = False
    ' 应用筛选条件
    ws.Range("A1:B1").AutoFilter Field:=1, Criteria1:="你的筛选条件" ' 修改为你的筛选条件
    Dim lastRow As Long
    lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row ' 获取最后一行
    Dim i As Long
    For i = 2 To lastRow ' 从第二行开始，假设第一行是标题
        If ws.Cells(i, "A").EntireRow.Hidden = False Then ' 仅处理未隐藏的行
            ws.Cells(i, "C").Value = ws.Cells(i, "A").Value & " " & ws.Cells(i, "B").Value ' 合并A列和B列数据到C列
        End If
    Next i
    ' 清除筛选
    ws.AutoFilterMode = False
End Sub

结论

在Excel中合并两列数据的方式有多种，可以根据具体需求选择不同的方法。使用“筛选功能”、使用“合并与居中”、使用“&符号或CONCATENATE函数”、使用“Power Query”、使用VBA代码都是有效的方法。根据数据量和复杂度，可以选择最适合的方法来提高工作效率。