|
|
#2
01-22-2015, 08:50 PM
|
||||
|
||||
You need to work backwards since the act of deleting a table reduces the number of tables in the document.
Sub RemoveTables2() Dim i As Integer For i = ActiveDocument.Tables.Count To 2 Step -2 ActiveDocument.Tables(i).Delete Next i End Sub PS. The code you posted is erroring because you are missing the word 'For' in the front of the 'Each ...' line 
|
| Tags |
| help please, tables, word vba |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
 Strange Characters Removal
|
OceansBlue | Word | 2 | 04-03-2013 10:01 AM |
|
Please help with header and footer removal
|
pwangdel | Word | 3 | 11-03-2011 06:10 AM |
|
Field removal from template
|
Phelony | Word | 1 | 10-18-2011 03:28 AM |
| background graphic removal | taffyevo | PowerPoint | 0 | 08-16-2011 06:36 AM |
|
Office 2007 removal and re-installation of previous version
|
Buckeyegator | Office | 1 | 03-25-2010 09:15 PM |
Windows 7 32bit 
Office 2010 32bit
Threaded Mode