RE: Plain Text Paste Macro

["Pinkham, Jim" <Jim -dot- Pinkham -at- voith -dot- com>]

Mine is quite similar:

Sub Paster()
'
' Pastes unformatted text
' Macro recorded 07/03/04 by Jim Pinkham
'
    Selection.PasteSpecial Link:=False, DataType:=wdPasteText,
Placement:= _
        wdInLine, DisplayAsIcon:=False
End Sub

I have this tied to the ALT+P keystroke, and it's fast and tidy. 

Jim

-----Original Message-----
From: techwr-l-bounces+jim -dot- pinkham=voith -dot- com -at- lists -dot- techwr-l -dot- com
[mailto:techwr-l-bounces+jim -dot- pinkham=voith -dot- com -at- lists -dot- techwr-l -dot- com] On
Behalf Of Lin Sims
Sent: Saturday, February 17, 2007 1:47 PM
To: J. Paul Kent
Cc: techwr-l -at- lists -dot- techwr-l -dot- com
Subject: Re: Plain Text Paste Macro

This is how it is in my special barsandmacros.dot template.

Sub PasteUnformated()
'
' PasteUnformated Macro
' Pastes the clipboard text as plaintext (unformatted)
    Selection.PasteAndFormat wdFormatPlainText End Sub

Works perfectly.

On 2/16/07, J. Paul Kent <jopakent -at- comcast -dot- net> wrote:
> I recorded the following macro cuz I was trying to save a keystroke or
two.
> I very frequently copy text from somewhere and need to paste it into a

> document as plain text. Generally I use Alt-E-S to bring up the paste 
> special dialog, but then I have to select plain text to get it to 
> insert without any formatting.
>
> So I recorded myself doing that, but that last step didn't seem to
record.
> When I execute the macro, the text comes in with it's native
formatting.
>
> Any suggestions?
>
> Sub PastePlain()
> '
> ' PastePlain Macro
> ' Macro recorded 2/16/2007 by Paul Kent '
>     Selection.PasteAndFormat (wdPasteDefault) End Sub
>
> Thanks in advance,
> J. Paul Kent
> 206-383-0539
> 206-508-1144
>
> ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
>
> Create HTML or Microsoft Word content and convert to Help file formats

> or printed documentation. Features include single source authoring, 
> team authoring, Web-based technology, and PDF output. 
> http://www.DocToHelp.com/TechwrlList
>
> Now shipping: Help &amp; Manual 4 with RoboHelp(r) import! New editor,

> full Unicode support. Create help files, web-based help and PDF in up 
> to 106 languages with Help &amp; Manual: http://www.helpandmanual.com
>
> ---
> You are currently subscribed to TECHWR-L as alyxyn -at- gmail -dot- com -dot- 
>
> To unsubscribe send a blank email to
> techwr-l-unsubscribe -at- lists -dot- techwr-l -dot- com
> or visit 
> http://lists.techwr-l.com/mailman/options/techwr-l/alyxyn%40gmail.com
>
>
> To subscribe, send a blank email to techwr-l-join -at- lists -dot- techwr-l -dot- com
>
> Send administrative questions to admin -at- techwr-l -dot- com -dot-  Visit 
> http://www.techwr-l.com/techwhirl/ for more resources and info.
>
>
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

Create HTML or Microsoft Word content and convert to Help file formats
or printed documentation. Features include single source authoring, team
authoring, Web-based technology, and PDF output.
http://www.DocToHelp.com/TechwrlList

Now shipping: Help &amp; Manual 4 with RoboHelp(r) import! New editor,
full Unicode support. Create help files, web-based help and PDF in up to
106 languages with Help &amp; Manual: http://www.helpandmanual.com

---
You are currently subscribed to TECHWR-L as Jim -dot- Pinkham -at- voith -dot- com -dot- 

To unsubscribe send a blank email to
techwr-l-unsubscribe -at- lists -dot- techwr-l -dot- com
or visit
http://lists.techwr-l.com/mailman/options/techwr-l/jim.pinkham%40voith.c
om


To subscribe, send a blank email to techwr-l-join -at- lists -dot- techwr-l -dot- com

Send administrative questions to admin -at- techwr-l -dot- com -dot-  Visit
http://www.techwr-l.com/techwhirl/ for more resources and info.

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

Create HTML or Microsoft Word content and convert to Help file formats or
printed documentation. Features include single source authoring, team authoring,
Web-based technology, and PDF output. http://www.DocToHelp.com/TechwrlList

Now shipping: Help &amp; Manual 4 with RoboHelp(r) import! New editor,
full Unicode support. Create help files, web-based help and PDF in up
to 106 languages with Help &amp; Manual: http://www.helpandmanual.com

---
You are currently subscribed to TECHWR-L as archive -at- infoinfocus -dot- com -dot- 

To unsubscribe send a blank email to
techwr-l-unsubscribe -at- lists -dot- techwr-l -dot- com
or visit http://lists.techwr-l.com/mailman/options/techwr-l/archive%40infoinfocus.com


To subscribe, send a blank email to techwr-l-join -at- lists -dot- techwr-l -dot- com

Send administrative questions to admin -at- techwr-l -dot- com -dot-  Visit
http://www.techwr-l.com/techwhirl/ for more resources and info.