-1
我有一个数据源,我需要在一个汇总表中显示它们。数据透视表字符串逗号分隔
请参阅从atached文件输出表,让我知道我怎么能作出这样的
Please find the sample attachment
我有一个数据源,我需要在一个汇总表中显示它们。数据透视表字符串逗号分隔
请参阅从atached文件输出表,让我知道我怎么能作出这样的
Please find the sample attachment
一种方法是有一个用户定义的函数,使逗号分隔的列表
Function MergeCOO(rId As Range, r1 As Range, r2 As Range) As String
Dim vIdx As Variant
Dim vCOO As Variant
Dim Id As Variant
Dim i As Long, str As String
Dim c As New Collection
Id = rId.Value
vIdx = r1
vCOO = r2
On Error Resume Next
For i = LBound(vIdx, 1) To UBound(vIdx, 1)
If vIdx(i, 1) = Id Then
c.Add vCOO(i, 1), vCOO(i, 1)
If Err.Number <> 0 Then Err.Clear
End If
Next
For i = 0 To c.Count
str = str & c.Item(i) & ","
Next
MergeCOO = Left(str, Len(str) - 1)
End Function
在表中添加公式到列L
来源
=MergeCOO([@[HS Code]],[HS Code],[COO])
然后,您可以将这个额外的列添加到您的报告中,只要您认为合适