I have two tables in the page footer and want to delete one of these,
depending on what optionbox in the form is selected
This code is not working so I need something similar.?
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.GoTo What:=wdGoToBookmark, Name:="bSidfStrategic"
With ActiveDocument.Bookmarks
.DefaultSorting = wdSortByName
.ShowHidden = False
End With
Selection.Tables(2).Select
Selection.Tables(2).Select
Selection.Tables(2).Delete
Selection.Delete Unit:=wdCharacter, Count:=1
Helmut Weber - 08 Apr 2005 10:56 GMT
Hi Senad,
not much use in recording something like that.
Have a look at this example:
With ActiveDocument.Sections(1).Headers
(wdHeaderFooterPrimary).Range.Tables(1).Delete
End With
Greetings from Bavaria, Germany
Helmut Weber, MVP
"red.sys" & chr(64) & "t-online.de"
Word 2002, Windows 2000