How to delete tables with a certain string in the name?

  • Thread starter Thread starter Henrootje
  • Start date Start date
H

Henrootje

I would like to delete all tables in my database that have the string
'_Importfouten' in their name.

Any suggestions no how to do this?

TIA,

Henro
 
Dim nm as Name
for each nm in Thisworkbook.Names
if instr(1,nm.Name,"_Improtfouten",vbTextCompare) then
nm.RefersToRange.Clear
end if
Next

Perhaps.
 
Back
Top