The print selection option does not work in a table.
The following macro will print selected text in a table or elsewhere to the
current active printer
Sub PrintSelected()
Application.ScreenUpdating = False
On Error GoTo Oops
Selection.Copy
Documents.Add
Selection.Paste
With ActiveDocument
.PrintOut
.Close wdDoNotSaveChanges
End With
Application.ScreenUpdating = True
End
Oops:
MsgBox "Select the text you wish to copy first!"
Application.ScreenUpdating = True
End Sub
Note Vista is an operating system not a Word version and does not affect the
issue.
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site
www.gmayor.com
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>