View Single Post
 
Old 10-29-2014, 05:08 AM
macropod's Avatar
macropod macropod is offline Windows 7 64bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 21,963
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

OK, you could just change:
.Text = vbTab
to:
.Text = "." & vbTab
but, if you want the period superscripted to match the footnote #, you'll need to replace:
If .Text = " " Then .Text = vbTab
with:
Code:
    If .Text = " " Then
      .Font.Superscript = True
      .Text = "." & vbTab
    End If
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote