Removing trailing spaces from footnotes

risomd · #1 08-30-2018, 05:28 PM

The documents are from others so I must deal with what I'm given. It may end up being better to trim the ends of all paragraphs, but first I'd like to figure out how to do it reliably in all cases.

Your macro returns "Run-time error 6028: The Range cannot be deleted" for this footnote:

Code:

Sub AddF()
With ActiveDocument.Footnotes
    .Add Range:=Selection.Range, Text:="  "
    .Item(1).Range.Hyperlinks.Add Anchor:=.Item(1).Range, Address:="FN  "
    .Item(1).Range.InsertAfter ("  ")
End With
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Removing spaces in activedocument after empty bookmarks	faustino909	Word VBA	2	08-03-2018 01:34 PM
How to remove trailing & leading spaces in a cell?	LearnerExcel	Excel Programming	8	02-04-2018 08:22 PM
removing spaces in cell	Tonykiwi	Excel	4	11-06-2016 09:30 PM
Mail Merge - Trailing Spaces	osucjb	Mail Merge	5	10-28-2016 12:03 AM
Word-Help with removing unwanted spaces in text	greshoff	Word	9	12-30-2011 03:24 PM