Fråga : VBA som tar bort rekord med ett bestämt, värderar bordlägger sammanlagt

Jag behöver att ändra denna kodifierar till, i stället för att tappa, bordlägger den start med ”rått”, mig skulle något liknande för att ta bort alla rekord med en
[fldSeries] (sätta in känt), med en värdera av [bildar]! [frmMain]! [txtSeries].  

All bordlägger namnger start med ”rått” har sätta in som är känd av [fldSeries].  Tack för några förslag! för class=" codeSnippet " för

1 för >Public underDropTables för id= " codeSnippet812430 " för >

" klar "

Svar : VBA som tar bort rekord med ett bestämt, värderar bordlägger sammanlagt

vad annat?

Offentliga underDeleteRecords ()

Dunkel td som dao.TableDef, db som dao. Databas rs som dao.recordset
Uppsättning db = CurrentDb

För varje td i db.TableDefs
    Om lämnat (td. Namnge 3) = ”rått” därefter
         om dcount (”*”, td.name,” [fldSeries] = ' ”& [bildar]! [frmMain]! [txtSeries] &” '”) >0 därefter        
        db. Utför ”borttagnings * från [” & td. Namnge & ”] var [fldSeries] = '” & [bildar]! [frmMain]! [txtSeries] & " '”,
        avsluta om
    Avsluta om
Därefter

Avsluta suben