VBA動的に条件に基づいて配列を分割する

Question

既存のString（）配列を複数の文字列配列に動的に分割する必要があります。現在、私の配列は、この

マイデータサンプル/アレイのように見えますが、次のようになります。

ID |価格|サプライヤー
01 | 05 | Lowtown
01 | 05 |ミッドタウン
01 | 05 |ミッドタウン
01 | 05 | Lowtown
01 | 05 | Hightown
01 | 05 | Lowtown
01 | 05 | Hightown

私は数字が増えていきますので、私は持っていますどのように多くのサプライヤーがわかりません。
IはLowtown Midtownvalues
アレイ（3）=行全体の
アレイ（2）=行全体の値のサプライヤの名称

アレイ（1）=行全体に基づいて、この現在の配列をこの分割を解析する必要がありますHightownが

Sub splitVendor(ByRef Arr() As String) 

' Split string and store into X variant 
Dim X As Variant 

For i = LBound(Arr) To UBound(Arr) 

    X = Split(Arr(i), " | ") 

Next i 



End Sub 

の値の私の意図は、（ベンダーの未知量）

を次に、グループアップ同様の値に編曲内のすべてのデータをループするループを作成し、動的に他の複数の配列にそれを格納することです

何か助けていただければ幸いです！ PS：私はちょうど1週間VBAを始めました、私はより多くの情報を提供できるかどうか教えてください！

Answer 1

テキストを列に移動>区切り文字>区切り文字= '|' > Finishをクリックします。すべてをグループ化する場合は、ピボットテーブルを使用します。もちろんこれはすべて可能ですが、少なくとも今のところはKISSよりも良いかもしれません。簡単なことをすべてマスターすれば、より複雑なものに進むことができます。