Fejl 3014 der kan ikke oprettes flere tabeller

Jeg har 5 6 kald til Open Close som vist nedenfor i min App

Herefter får jeg: " Fejl 3014 der kan ikke oprettes flere tabeller"

Public Sub OpenRecordset_Sub(SQL As String, DAO.Dba As Database, rs As DAO.Recordset)
    Set Dba = CurrentDb()
    Set rs = Dba.OpenRecordset(SQL, dbOpenSnapshot)
End Sub

Public Sub CloseRecordset_Sub(Dba As DAO.Database, rs As DAO.Recordset)
    rs.Close
    Dba.Close
    Set rs = Nothing
    Set Dba = Nothing
End Sub

Har i et forslag til løsning