Excel 365环境下按SKU合并多行URL为分号分隔单单元格的批量处理方法咨询

嘿，DaveG，我完全懂你现在的困扰——要把分散在多行的同SKU图片URL合并成单个分号分隔的单元格，适配目标数据库的格式对吧？刚好你用的是Excel 365，有几个超实用的方法可以搞定这个，不用手动一个个复制粘贴，效率直接拉满：

方法一：用Excel 365专属动态数组函数一步到位 #

这个方法最省心，不用复杂操作，直接写公式就能生成目标格式的表格：

1. 提取唯一SKU列表：在新的工作表（比如Sheet2）的A2单元格输入公式：

   =UNIQUE(FILTER(Sheet1!A:A,Sheet1!A:A<>""))
   

   这个公式会自动把原表（假设是Sheet1）里所有非空的SKU提取出来，生成唯一的SKU列表，每个SKU占一行。

2. 合并对应URL：在Sheet2的B2单元格输入公式：

   =TEXTJOIN(";",TRUE,FILTER(Sheet1!B:B,Sheet1!A:A=A2))
   

   回车后，这个公式会自动找到A2单元格SKU对应的所有URL，用分号连接起来。而且因为是动态数组，公式会自动向下填充，所有SKU对应的合并URL都会生成。

小提示：如果原表的SKU行之间的空行不是刚好100行也没关系，这个公式会自动匹配所有属于该SKU的URL，不管中间空行数量多少。

方法二：用Power Query批量转换（适合数据量超大的情况） #

如果你的数据行数特别多，Power Query处理起来更稳定，步骤如下：

1. 选中原数据区域（包括表头），点击「数据」选项卡→「从表格/区域」，确认弹窗里的「我的表格有标题」，进入Power Query编辑器。
2. 在编辑器里，选中「sku」列，点击「转换」选项卡→「填充」→「向下」，这样会把空行的sku列自动填充为上方的SKU值。
3. 接下来，选中「sku」列，点击「转换」选项卡→「分组依据」，设置：
   • 分组依据：sku
   • 新列名：可以叫「合并URL」
   • 操作：选择「求和」旁边的下拉，选「连接」
   • 分隔符：输入「;」
4. 点击确定后，就会生成每个SKU对应合并URL的表格，最后点击「关闭并上载」，就能把处理好的数据放到新工作表里。

方法三：VBA宏（适合需要重复操作的场景） #

如果你以后还要经常处理这类数据，可以写个简单的宏来一键完成：

按Alt+F11打开VBA编辑器，插入一个新模块，粘贴以下代码：

Sub MergeURLsBySKU()
    Dim wsSource As Worksheet, wsTarget As Worksheet
    Dim lastRow As Long, i As Long, targetRow As Long
    Dim currentSKU As String, mergedURLs As String
    
    Set wsSource = ThisWorkbook.Sheets("Sheet1") '原数据工作表
    Set wsTarget = ThisWorkbook.Sheets.Add '新建目标工作表
    wsTarget.Name = "合并结果"
    
    '写入表头
    wsTarget.Range("A1").Value = "sku"
    wsTarget.Range("B1").Value = "url"
    targetRow = 2
    
    lastRow = wsSource.Cells(wsSource.Rows.Count, "A").End(xlUp).Row
    currentSKU = wsSource.Range("A2").Value
    mergedURLs = ""
    
    For i = 2 To lastRow
        If wsSource.Range("A" & i).Value <> "" Then
            '如果遇到新SKU，先把之前的合并结果写入目标表
            If targetRow > 2 Then
                wsTarget.Range("B" & targetRow - 1).Value = mergedURLs
            End If
            currentSKU = wsSource.Range("A" & i).Value
            wsTarget.Range("A" & targetRow).Value = currentSKU
            mergedURLs = wsSource.Range("B" & i).Value
            targetRow = targetRow + 1
        Else
            '继续合并URL
            mergedURLs = mergedURLs & ";" & wsSource.Range("B" & i).Value
        End If
    Next i
    
    '写入最后一个SKU的合并结果
    wsTarget.Range("B" & targetRow - 1).Value = mergedURLs
    
    MsgBox "合并完成！结果已保存到「合并结果」工作表", vbInformation
End Sub

保存后，回到Excel，按Alt+F8选择这个宏执行即可。

这三个方法都能完美解决你的问题，优先推荐第一种函数方法，最快捷；数据量大就用Power Query；需要重复操作就用VBA。

备注：内容来源于stack exchange，提问作者DaveG