実行時エラー ‘3265’　オブジェクトがコレクションで見つかりませんでした。

レコードセットの値を取得するときに出たエラー。
フィールド名は絶対に間違っていないのになぜ？と思っても
実際にレコードセットのフィールド名を取得してみるのが、賢明。

----------------------------
    Dim i As Long

    For i = 0 To rs.Fields.Count - 1
        debug.print rs.Fields(i).Name
    Next
----------------------------

Next