2017-04-06 38 views
0

女士訪問分裂我有一個SharePoint列表,員工進去和填寫信息,然後我的列表導出到Excel(在我的公司,訪問和SharePoint不互相發揮好)並將其導入到Access以運行報告。這很好,除了一列。員工可以在多個縣工作,所以在SharePoint上我有一個查找列,他們可以選擇多個縣...問題是,當我將它導出到Excel時,它看起來像這樣:SharePoint列表/ Excel來在分隔符

[縣] Outagamie;# 1

[縣]阿什蘭;#35; #Bayfield;#66; #Douglas;#67; #Iron;#68

我只希望縣名:

[縣]奧特加米

[縣]阿什蘭,貝菲爾德,道格拉斯,熨斗

又有些員工可能有一個縣,一些可能有5或6。我知道我可以做在Excel的公式,但我想使這個容易對誰都會運行此報告中的其他人,所以我想只導入Excel文件並根據查詢運行報告。

爲了上帝的愛,你會認爲這將是一個Access查詢一件容易的事情,但是當我研究這個,我只能想辦法做到這一點在Excel中。在Access中必須有一種方法。請幫助...

回答

0

Hummm,看起來像查找/替換會做的伎倆。

+0

感謝您的幫助。當我嘗試查找/替換它說沒有項目可以找到,做了複製和粘貼的文字,但它仍然沒有任何結果。我搜索了Google的替換功能,但我還沒有找到任何關於多個標準的好信息。至少在Access中...我試圖跳過使用Excel,但似乎這可能是我唯一的選擇。 – Jordy

0

你可以這樣創建一個小的輔助函數:

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