office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

access將文本拆分轉化爲一箇數組

2020-02-24 08:00:00
tmtony8
原創
183

有網友問到如何把文本轉換成變量數組。

有下麵文字“This website is office-cn”。我們希望把這段文字拆分單詞後放入數組中。

拆分我們可以使用split函數。空白用space(1)卽可


Sub TheSplitFunction()
  
  Dim vaWords As Variant
  Dim i As Long
  
  vaWords = Split("This website is office-cn.", Space(1))
  
  For i = LBound(vaWords) To UBound(vaWords)
    Debug.Print vaWords(i)
  Next i
  
End Sub




vawords變量將是包含四箇元素的變量數組,這箇元素分彆是This、website、is、office-cn。

分隔符是一箇空格,併未包含在元素中。


    分享