VBAを使用してユニークなフィールドに基づいてアクセステーブルからCSVファイルを抽出する

Question

私は様々なフィールドと数千のレコードを持つアクセステーブルを用意しています。テーブルの1番目のフィールドは重複したレコードを持つモバイル番号ですが、対応する他のフィールドは一意です。私がその基準にしたいのは、第1フィールドのすべての同様の携帯番号を、対応するレコードを含む新しいCSVファイルにエクスポートする必要があるということです。サンプルファイルとアウトプットは以下の通りです。親切にもVBAコードでのアクセスを手伝ってください。デコードに問題があります。どんな助けもありがとう。

アクセステーブル：この

Field1 Field2 Field3 Field4 
AAA VGB  GHT GBH 
CCC FGT  BDE NHG 
AAA GGT  BNF NFR 
AAA BGF  MKJ GFT 
CCC VFD  NHJ NGF 

出力は、ユニークな携帯電話番号の名前を持つ2つのCSVファイルでなければなりません。アウトアウトは以下に示されます

CSVファイル1（AAA）;

Field1 Field2 Field3 Field 4 
AAA VGB GHT GBH 
AAA GGT BNF NFR 
AAA BGF MKJ GFT 

CSVファイル2（CCC）は

Field1 Field2 Field3 Field4 
CCC FGT BDE NHG 
CCC VFD NHJ NGF 

Answer 1

これは、SQLおよび出力CSV（クエリ、ファイル/テキストへの結果）に結果でこれを行うには、おそらく簡単です。必要に応じて、VBAを使用して自動化することができます。これは、フィールド1の値が変化しますが、その後、切り刻むことができ、一つのファイルに行くだろう フィールド1

BY * FROM YourTable 順序を選択 SQLは のようなものかもしれません。

少し好きであるには、selectのまわりでカーソルを使用し、Field1の値を@ Field1変数にフェッチして、個々のファイルに出力することができます。

フィールド1 = @フィールド1

ここにカーソル例WHERE YourTable FROM * を選択： https://www.codeproject.com/Tips/277847/How-to-use-Cursor-in-Sql