Question

我有一个SharePoint列表，员工进入并填写信息，然后我将列表导出到Excel（在我的公司，Access和SharePoint彼此不能很好地相互配合）并将其导入Access以运行报告。它很棒，除了一栏。员工可以在多个县工作，所以在SharePoint上我有一个查找列，他们可以选择多个县...问题是，当我将它导出到Excel时，它看起来像这样：

[县] Outagamie;＃1

[县]亚什兰;＃35; #Bayfield;＃66; #Douglas;＃67; #Iron;＃68

我只想要县名：

[县] Outagamie

[县]亚什兰，贝菲尔德，道格拉斯，铁

有些员工可能会有一个县，有些可能有5个或6个。我知道我可以在excel中做一个公式，但是我试图让其他人来这个报告很容易，所以我想只需导入Excel文件并根据查询运行报告。

对于对上帝的爱，你会认为这在Access查询中是一件容易的事情，但是当我研究这个时，我只想办法在Excel中做到这一点。在Access中必须有一种方法。请帮忙......

Answer 1

Hummm，看起来像Find / Replace就可以了。

Answer 2

您可以创建一个这样的小辅助函数：

Public Function CleanString(ByVal Value As String) As String

    Dim Parts   As Variant
    Dim Part    As Integer
    Dim Result  As String

    Parts = Split(Value, ";#")
    For Part = LBound(Parts) To UBound(Parts)
        If Part Mod 2 = 0 Then
            If Result <> "" Then
                Result = Result & ", "
            End If
            Result = Result & Parts(Part)
        End If
    Next

    CleanString = Result

End Function

SharePoint List / Excel to Ms Access在分隔符处拆分

2 个答案: