在VBA

Question

过去，我总是通过查询数据库，将其放在工作表上，排序，读入数组，然后循环创建文档来生成报告。我现在要做的是直接从记录集生成报告。

我遇到的问题是当使用数组时我有一个绝对记录号，所以我可以检查前一条记录中的字段是否与当前记录中的字段相同。

使用记录集执行此操作的最佳方法是什么？将字段值存储在变量中？使用嵌套的While循环？获取总记录数并使用绝对位置来回移动（这似乎不是一个好主意）？

更新 记录集包含来自20家不同公司的多条记录。我按公司名称对查询进行排序，然后开始循环。然后，我需要检查每条记录，看它是否来自与之前相同的公司，如果没有为该公司创建新的工作表。

Answer 1

我通常在查询中使用＆＃34; Order By＆＃34;条款。然后使用变量循环遍历已排序的记录以跟踪当前的排序顺序名称，并通过将当前记录名称字段与变量值进行比较来检测名称更改。