Questione : VBA per cancellare una serie specifica di tabelle di accesso

Ho una base di dati di accesso con la seguente lista delle tabelle:

tblType1Apple
tblType1Pear
tblType2Cabbage
tblType3Car


I che cerca un blocco di codice di VBA che cadrà (rimuovere) TUTTE LE tabelle nella mia base di dati che cominciano con “tblType1„.  
Notice che voglio “cadere„ la tabella in contrasto con “cancellazione„ la tabella.  Nei termini di SQL sarebbe qualcosa di simile: class= " lineNumbers " >

1 del >

Sub codeBody DropTables " del prettyprint " " del class= del id= " codeSnippet811373 del >


Maybe di 




class= del 

Risposta : VBA per cancellare una serie specifica di tabelle di accesso

usare il tabledef

oscurare il TD come dao.tabledef, db come dao.database
regolare il db=currentdb

per l'ogni TD in db.tabledefs
    se andato (td.name, 8)= " tblType1 " allora
        db.execute “tabella di goccia [“& td.name &„]„
    concluder se
dopo