VBA이 항목은

Question

내가 런타임 오류 '3265'을 받고 계속 유지하는이 컬렉션에서 찾을 수 없습니다 .

내가 뭘 잘못하고 있니? 어떻게 해결할 수 있습니까?

Option Compare Database 
Option Explicit 

Public Function Update20BldgRank() 
Dim db As Database 
Dim rstAnswers As Recordset 
Dim i As Integer 
Dim irank As Integer 
irank = 1 
Set db = CurrentDb() 
Set rstAnswers = db.OpenRecordset("Top20Genbld13", dbOpenDynaset) 
rstAnswers.MoveFirst 
Do Until rstAnswers.EOF 
rstAnswers.Edit 
rstAnswers("20GBRank") = irank 
rstAnswers.Update 
rstAnswers.MoveNext 
irank = irank + 1 
Loop 
rstAnswers.Close 
Update20BldgRank = irank - 1 
End Function 

Answer 1

그냥 당신이 오류가 발생하는 경우 20GRank이 DB에 존재 확인 필드 (열)합니다.