VBAをトークンに変換する

Question

複数の文字コードを含む文字列があり、そのコードに従って解析したいと思います。私は、それがコードの一部を構成するかどうかを判断するために、複数の文字を見えるようにする方法がわかりません。

私の文字列は次のようになります。

BBCTEEBOBBB

、私はこれらのインスタンスを解析したい：

E BB CT BOB

だから、結果は（出力する必要がありますまたは配列）は、次のようになります。

BB CT E E BOB BB

Answer 1

私は正規表現を使用します。 In ツール|参考資料には、PC上で入手できるMicrosoft VBScript正規表現ライブラリの最高バージョン（5.5版）が追加されています。その後、次のようなコードを使用することができます。

Sub main() 
    Dim x, m 
    Set x = myparser("BBCTEEBOBBB") 
    For Each m In x 
    Debug.Print m.Value 
    Next 
End Sub 

Function myparser(string_to_parse) 
    Dim splitter As New RegExp 
    splitter.Pattern = "E|BB|CT|BOB" 
    splitter.Global = True 
    Set myparser = splitter.Execute(string_to_parse) 
End Function 

myparser関数はmainサブルーチンのように見学することができるMatchCollectionオブジェクトを生成します。出力は、入力文字列で見つかったすべての一致のリストです。これを簡単に変換して、配列や空白で区切られた文字列を生成することができます。