엑셀 vba 함수가 레코드 집합을 반환합니다.

Question

RecordSet을 반환하는 VBA 함수가 있고이 RecordSet이 서브 루틴에 사용됩니다. 함수 자체는 모듈에 있습니다. 나는 서브 루틴에 RecordSet을 닫으려고하면

1. 나는 함수의 연결을 종료하려고하면, 그것은
2. 실패 할 수있는 응용 프로그램을 발생합니다 함수 자체가 성공적으로 RecordSet를 반환하는 동안, 나는이 문제가 사용 후에는 응용 프로그램이 실패합니다.

그래서 레코드 세트를 반환하고 레코드 세트를 사용한 후 함수에서 연결을 닫으려면 어떻게해야합니까?

내 함수는 연결을 만들고, 열어보고 쿼리를 실행합니다.

Answer 1

레코드 집합을 사용한 후에는 반드시 닫아야합니다.

레코드 집합이 활성화되면 리소스를 소비합니다. 레코드 세트를 사용한 후에는 사용중인 메모리를 해제해야 컴퓨터의 다른 객체에서 사용할 수있게됩니다. 이 작업은 Recordset 개체에 Nothing을 사용하여 수행됩니다. 다음은 예입니다.

'Clean Up 
rsTemp.Close 'closing recordset 
Set rsTemp= Nothing ' free the memory 

마지막으로 연결을 닫을 수 있습니다.

If con.State = adStateOpen Then 
con.Close 
End If 

If Not con Is Nothing Then Set con = Nothing 

Answer 2

기능으로하지 마십시오. 서브 루틴으로 모듈화