"Paste Special - Unformatted Text" Macro

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Jim In Minneapolis - 25 Nov 2007 02:34 GMT

Hi. Can somebody tell me how to create a macro to . . .

"Paste Special . . . UNFORMATTED Text"

(I've tried clicking onthe "Paste" toolbar icon during macro-creation, and
even though I DO try to record the "Unformatted Text" option, before closing
the recording . . . . when actually executing, the macro just performs a
STANDARD paste . . . i.e. NOT unformatted!)

Ugh.

Thanks for anybody's help.

Reply to this Message

Bill Foley - 25 Nov 2007 03:37 GMT

Try this:

Sub PasteSpecialText()
Selection.Range.PasteSpecial DataType:=wdPasteText
End Sub

Bill Foley

> Hi. Can somebody tell me how to create a macro to . . .
>
[quoted text clipped - 9 lines]
>
> Thanks for anybody's help.

Reply to this Message

Jim In Minneapolis - 25 Nov 2007 09:00 GMT

Thanks so much, Bill.

Yes . . . that works wonderfully!

Can I ask you another question? . . .

I've just recently swithced from Word 2003 to Word 2007. I have a few
really-time-consuming macros in my Words 2003 "normal.dot". Is there any
chance I can somehow import than into Word 2007?

I don't have a clue how to go about it. What do you think?

> Try this:
>
[quoted text clipped - 17 lines]
> >
> > Thanks for anybody's help.

Reply to this Message

Graham Mayor - 25 Nov 2007 10:56 GMT

It would help to error trap the paste macro so it doesn't fall over if there
is nothing in the clipboard

On Error GoTo Oops
Selection.PasteSpecial DataType:=wdPasteText, Placement:= _
wdInLine
End
Oops:
Beep

I assume you mean time *saving* macros? Most Word 2003 macros will run in
2007, so copy them there and see what happens. If you have a problem we may
be help you to resolve it then - see
http://www.gmayor.com/installing_macro.htm

Signature

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

> Thanks so much, Bill.
>
[quoted text clipped - 29 lines]
>>>
>>> Thanks for anybody's help.

Reply to this Message