atw: Re: Word again

  • From: Rhonda Bracey <rhonda.bracey@xxxxxxxxxxxxxxxx>
  • To: "austechwriter@xxxxxxxxxxxxx" <austechwriter@xxxxxxxxxxxxx>
  • Date: Tue, 2 Sep 2014 12:28:25 +0800

Ummm… CyberText is me, not Ted.

And a quick shortcut for format painter is Ctrl+Shift+C to copy the formatting 
(style if there is no manual formatting) and Ctrl+Shift+V to apply that 
formatting to another section (see: 
http://cybertext.wordpress.com/2009/01/21/word-run-format-painter-with-the-keyboard/
 )

Rhonda

Rhonda.bracey@xxxxxxxxxxxxxxxx<mailto:Rhonda.bracey@xxxxxxxxxxxxxxxx>
Website: http://cybertext.com.au
Blog: http://cybertext.wordpress.com

From: austechwriter-bounce@xxxxxxxxxxxxx 
[mailto:austechwriter-bounce@xxxxxxxxxxxxx] On Behalf Of Neil Maloney
Sent: Tuesday, 2 September 2014 11:05 AM
To: austechwriter@xxxxxxxxxxxxx
Subject: atw: Re: Word again

Christine, okay, then pasting the text as unformatted text appears to be the 
way you need to go.

From Ted Mooney's CyberText Newsletter (hello, Ted) ...

To paste copied text as unformatted text in Word 2010 using the keyboard:

    Press Ctrl+v to copy the text into your document.
    Press Ctrl to activate the Paste Options icon.
    Press t to select the ‘Text only’ option (pressing t is a separate action 
to pressing Ctrl in step 2 — DO NOT press them together otherwise it won’t 
work).

The newsletter is at:

http://cybertext.wordpress.com/2012/11/21/word-2010-keyboard-shortcut-to-paste-unformatted-text/

... and I'm assuming that where there is more than one paragraph of text copied 
in, the above works for all of the copied paragraphs ... but, don't know for 
sure and can't confirm.

Cheers,
Neil.

On 2/09/2014 12:55 PM, Christine Kent wrote:
Unfortunately I have no ability to control source documents and so cannot get 
any template with a macro officially distributed. In addition, no-one I work 
with would even know what a macro is. Most documents are modified from existing 
documents, whence the mess. This is something I have no authority or influence 
to change.

I have to start from their starting point and take them one step or two 
further. Word Nirvana is not the proposed destination – just a little less 
carnage would be a high level achievement.

I can maybe get a utility downloaded and distributed to everyone if I can 
guarantee it is useful and safe. I will try that.  But as a backup, I would 
still love to find all those rules which I will publish on my blog.  My Word 
Numbering instructions there are very popular, and this might be a useful 
addition.

Cheers,

[cid:image001.png@01CFC6A9.62B75B30]

Christine Kent | Technical Communications
Direct: 03 9947 3730 | Tel: 03 9947 3700 | Fax: 03 9947 3701 | 
<http://www.hpv.org.au/>
Level 34, Casselden Place, 2 Lonsdale Street, Melbourne 3000
www.hpv.org.au<http://www.hpv.org.au/>




Working with Victoria’s health sector to achieve best-value supply chain 
outcomes



From: 
austechwriter-bounce@xxxxxxxxxxxxx<mailto:austechwriter-bounce@xxxxxxxxxxxxx> 
[mailto:austechwriter-bounce@xxxxxxxxxxxxx] On Behalf Of Neil Maloney
Sent: Wednesday, 20 August 2014 12:35 PM
To: austechwriter@xxxxxxxxxxxxx<mailto:austechwriter@xxxxxxxxxxxxx>
Subject: atw: Re: Word again

I use PureText too, and agree with how extremely useful it is. If there are 
problems in getting the client to run / install the program on its installed 
computer base, the following Macro does the same thing (and e.g. needs to be 
assigned a control key combination to activate it).

Neil.

Sub CopyOver()

    On Error GoTo nextwindow

    MyWindows = Windows.Count
    If MyWindows > 2 Then
        MsgBox "Too many documents are open." + vbCr + vbCr + "Please close all 
opened documents except the document you are copying text from, and the 
document you are copying the text to."
        GoTo Endit
    ElseIf MyWindows < 2 Then
        MsgBox "Not enough documents are open." + vbCr + vbCr + "Please ensure 
you have opened the document you are copying text from, and the document you 
are copying the text to."
        GoTo Endit
    End If

   'Select paragraph
    Selection.StartOf Unit:=wdParagraph, Extend:=wdMove
    Selection.Extend
    charmoved = Selection.EndOf(Unit:=wdParagraph, Extend:=wdExtend)
    If charmoved = 0 Then MsgBox "Selection unchanged"
    Selection.MoveLeft Unit:=wdCharacter, Count:=1 ' don't want para mark, this 
contains the style

    Selection.Font.Reset
    Selection.Copy
    Selection.MoveDown Unit:=wdParagraph, Count:=1
    ActiveWindow.Previous.Activate
    GoTo PasteIt

nextwindow:
    ActiveWindow.Next.Activate

PasteIt:

    Selection.PasteAndFormat (wdPasteDefault)
    Selection.TypeParagraph

Endit:


End Sub
On 2/09/2014 12:11 PM, Katherine Munro wrote:
Hi,

If you regularly do the Notepad round trip (or use Word's paste without 
formatting), then have a look at PureText. Brilliantly simple open source tool 
that uses an alternative keyboard shortcut to paste without formatting.

Regards,
Katherine

On Tuesday, 2 September 2014, Bob T 
<bob.trussler@xxxxxxxxx<mailto:bob.trussler@xxxxxxxxx>> wrote:
Christine and others,
When I have issues with Word trying to be helpful and not doing what I want, I 
do this:
1 - copy text
2 - paste into Notepad
3 - cut from Notepad
4 - paste into Word document
5 - if the style needed adjusting, use the Format Painter tool to apply the 
style.
Yes, it is clunky and four steps too long, but it always worked for me.
A shorter vesion is to
1 - copy text
2 - paste into Word document
3 - use Format Painter to tidy up styles.

Bob T


--
Bob Trussler


--
Katherine Munro
http://www.germanteaching.com
Resources for German, Chinese, ESL, Indonesian and Japanese

************************************************** To view the austechwriter 
archives, go to 
www.freelists.org/archives/austechwriter<//www.freelists.org/archives/austechwriter>
 To unsubscribe, send a message to 
austechwriter-request@xxxxxxxxxxxxx<mailto:austechwriter-request@xxxxxxxxxxxxx> 
with "unsubscribe" in the Subject field (without quotes). To manage your 
subscription (e.g., set and unset DIGEST and VACATION modes) go to 
www.freelists.org/list/austechwriter<//www.freelists.org/list/austechwriter>
 To contact the list administrator, send a message to 
austechwriter-admins@xxxxxxxxxxxxx<mailto:austechwriter-admins@xxxxxxxxxxxxx> 
**************************************************

PNG image

Other related posts: