使用VBA

Question

我有一个包含各种字段和数千条记录的访问表。表中的第一个字段是具有重复记录的移动号码但是相应的其他字段是唯一的。我想要的第一个字段中所有相似的手机号码应该导出到具有相应记录的新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自动执行此操作。 SQL可能是这样的 选择     * 从     YourTable 订购     FIELD1

这将进入一个文件，然后当Field1值更改时可以将其删除。

要有点发烧友，可以在选择周围使用光标，从中获取Field1值，然后将其变为变量@ Field1并用于输出到单个文件中。

选择     * 从     YourTable 哪里     Field1 = @ Field1

这里的光标示例： https://www.codeproject.com/Tips/277847/How-to-use-Cursor-in-Sql