 |
 | Home | Contact Us | FAQ | Search & Site Map | Link to Us |
 | Sign In | Join | Other 45 Sites in Network |
| HomeDiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWordDirectoryUser Groups Related Topics Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ... |
MS Office Forum / Word / Programming / April 2005delete all bookmarks in file
Can a macro delete all bookmarks in a file? I want to be able to delete all of them without knowing in advance how many there are, since the number will vary from file to file. I'm using Word XP. > Can a macro delete all bookmarks in a file? I want to be able to delete > all [quoted text clipped - 3 lines] > > I'm using Word XP. This will do the needful Dim n as Long For n = 1 to ActiveDocument.Bookmarks.Count ActiveDocument.Bookmarks(1).Delete Next n  SignatureRegards Jonathan West - Word MVP www.intelligentdocuments.co.uk Please reply to the newsgroup Ha ha! Typo! Dim n as Long For n = 1 to ActiveDocument.Bookmarks.Count ActiveDocument.Bookmarks(n).Delete Next n > > Can a macro delete all bookmarks in a file? I want to be able to delete > > all [quoted text clipped - 10 lines] > ActiveDocument.Bookmarks(1).Delete > Next n > Ha ha! Typo! > > Dim n as Long > For n = 1 to ActiveDocument.Bookmarks.Count > ActiveDocument.Bookmarks(n).Delete > Next n No typo. You try it my way and then your way, and see which works. SignatureRegards Jonathan West - Word MVP www.intelligentdocuments.co.uk Please reply to the newsgroup Oops! I take that back. Sorry! > > Ha ha! Typo! > > [quoted text clipped - 4 lines] > > No typo. You try it my way and then your way, and see which works. Vince, you should have tried it first, before proving so gleeefully to the world that you're an obnoxious fuckwit. > Ha ha! Typo! > [quoted text clipped - 17 lines] >> ActiveDocument.Bookmarks(1).Delete >> Next n when I use this method for deleting all bookmarks, for some reason the var n only goes up to half of the ActiveDocument.Bookmarks.Count total and then exits the loop. If I try to force the loop to calculate over half, it shows the Bookmarks(n) to be invalid. anybody have any clues? Thanks alot, J. > Ha ha! Typo! > [quoted text clipped - 17 lines] > > ActiveDocument.Bookmarks(1).Delete > > Next n Jonas, Try this: Sub DeleteBookmarks() Dim n As Long For n = ActiveDocument.Bookmarks.Count To 1 Step -1 ActiveDocument.Bookmarks(n).Delete Next n End Sub SignatureGreg Maxey/Word MVP See: http://gregmaxey.mvps.org/word_tips.htm For some helpful tips using Word. > when I use this method for deleting all bookmarks, for some reason > the var n only goes up to half of the ActiveDocument.Bookmarks.Count [quoted text clipped - 32 lines] >>> www.intelligentdocuments.co.uk >>> Please reply to the newsgroup Thanks for your reply. But I dont think this is going to work for me because Im controlling Word from a non-microsoft language through com-handles. > Jonas, > [quoted text clipped - 44 lines] > >>> www.intelligentdocuments.co.uk > >>> Please reply to the newsgroup Should be (1).Delete and NOT (n).Delete. I thought it was a typo back then until Jonathan corrected me. **************************************** Dim n as Long For n = 1 to ActiveDocument.Bookmarks.Count ActiveDocument.Bookmarks(1).Delete Next n **************************************** > when I use this method for deleting all bookmarks, for some reason the var n > only goes up to half of the ActiveDocument.Bookmarks.Count total and then [quoted text clipped - 25 lines] > > > ActiveDocument.Bookmarks(1).Delete > > > Next n |
Reply to this Message |
 Sign In
 Join
 My Latest Posts My Monitored Threads My Blog My Photo Gallery My Profile My Homepage Start New Thread Enable EMail Alerts Rate this Thread
|
©2008 Advenet LLC Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.