如何提取数据，例如我需要提取所有产品代码 [关闭]

Question

产品编号：5635，产品数量：1，产品 SKU：604BK/M/EMB-402281-34942，产品名称：RAS - 经典全拉链微抓绒夹克，产品重量：0.0000，产品变体详情：颜色：黑色，尺码：中号，产品单价：12.15，产品总价：12.15|产品编号：5639，产品数量：2，产品 SKU：203/BK/XL/EMB-402281，产品名称：RAS - 经典卫衣，产品重量：0.0000，产品变体详细信息：颜色：黑色，尺码：XL，产品单价：8.20，产品总价：16.40|产品 ID：5639，产品数量：4，产品 SKU：203/BK/M/EMB-402281，产品名称： RAS - 经典运动衫，产品重量：0.0000，产品款式详情：颜色：黑色，尺码：中号，产品单价：8.20，产品总价：32.80|产品 ID：5639，产品数量：2，产品 SKU：203/BK /3XL/EMB-402281，产品名称：RAS - 经典运动衫，产品重量：0.0000，产品变体详情：颜色：黑色，尺码：3XL，产品单价：8.90，产品总价：17.80|产品编号： 5640，产品数量：1，产品 SKU：804/OR/3XL/RAS，产品名称：RAS - 高能见度飞行员夹克，产品重量：0.0000，产品变体详情：颜色：橙色，尺码：3XL，产品单价：21.15 , 产品总价：21.15|产品编号：5640，产品数量：2，产品 SKU：804/OR/XL/RAS，产品名称：RAS - 高能见度飞行员夹克，产品重量：0.0000，产品变体详情：颜色：橙色, 尺寸：XL，产品单价：20.40，产品总价：40.80|产品编号：5640，产品数量：3，产品 SKU：804/OR/M/RAS，产品名称：RAS - 高能见度飞行员夹克，产品重量：0.0000，产品变化详情：颜色：橙色，尺寸：中等，产品单价：20.40，产品总价：61.20|产品 ID：6176，产品数量：2，产品 SKU：RAS-101NOLOGO-BL-XL，产品名称：RAS - 经典 Polo 衫无徽标，产品重量：0.0000，产品变体详情：颜色：黑色，尺码：特大号，产品单价：4.45，产品总价：8.90|产品编号：6176，产品t 数量：4，产品 SKU：RAS-101NOLOGO-BL-ME，产品名称：RAS - 经典无徽标 Polo 衫，产品重量：0.0000，产品变体详情：颜色：黑色，尺码：中号，产品单价：4.45，产品总价：17.80|产品编号：6176，产品数量：2，产品 SKU：RAS-101NOLOGO-BL-3X，产品名称：RAS - 无标志经典 Polo 衫，产品重量：0.0000，产品变体详情：颜色：黑色，尺码：3XL，产品单价：5.15，产品总价：10.30|产品编号：6192，产品数量：4，产品 SKU：RAS-BC045，产品名称：RAS - Original Turnup Beanie Hat，产品重量：0.0000，产品变化详情: , 产品单价: 4.20, 产品总价: 16.80

我只知道提取2个字符之间的单个短语

Answer 1

这里是使用 loop thro split() 的示例：

Sub foo()
    Dim data As String, part As Variant
    data = [A1].Value
        
    For Each part In Split(data, ",")
        If part Like "*SKU*" Then
            Debug.Print Split(part)(3)
        End If
    Next part

End Sub

演示：

使用公式可以是这样的：

=FILTERXML("<t><r>"&SUBSTITUTE(RIGHT(A1,LEN(A1)-SEARCH("SKU: ",A1,1)-4),"SKU: ","</t><r>")&"</t></t>","//r")

演示：