הסרת טבלאות בקובץ וורד

[גיליון]

יש לי קובץ וורד עם המון טבלאות.
יש אפשרות לתת הוראה להסיר את כל הטבלאות?
(אני רוצה שיישארו לי רק הכותרות שמחוץ לטבלאות.)

 

[צורת הדף]

בבקשה.

Sub Delete_All_Tables()
For Each tbl In ActiveDocument.Tables
tbl.Delete
Next
End Sub

 

[ח. שושני]

בבקשה.

Sub Delete_All_Tables()
For Each tbl In ActiveDocument.Tables
tbl.Delete
Next
End Sub

איפה שמים קודים בוורד?

 

[g2035]

איפה שמים קודים בוורד?

איפה באמת?

 

[צורת הדף]

http://www.prog.co.il/showpost.php?p=440554&postcount=13