transposting characters

[Guest]

I'm interested in using a macro to transpose letters. For example, if I type
wrod rather than word, I'd like to use a macro to transpose the r and the o.
Any suggestions?

 

[Suzanne S. Barnhill]

If "wrod" is a word you consistently mistype, it would be more efficient to
create an AutoCorrect entry for it. That will be automatic and much faster.
The transposition macro you describe is fairly trivial for those with VBA
expertise, but it does require you to pick up a mouse and select the text
before you can run it, and you would have to assign a toolbar button or
keyboard shortcut to it to make it useful.

Bottom line: whenever you see that you're correctly the same error
routinely, instead of backspacing to correct it, right-click to get the
suggestions for correction, then, instead of selecting one, click
AutoCorrect and then select the correction. This adds an AutoCorrect entry
so that you never have to make this correction again.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA

Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

 

[Guest]

Suzanne - Is there a way to transpose two letters in words that are NOT
routinely misspelled?

 

[Guest]

Suzanne - Is there a way to transpose two letters in words that are NOT
routinely misspelled?

 

[Suzanne S. Barnhill]

Someone could undoubtedly write a macro to do this. It's obviously a popular
function; I think one of the first Word books I ever owned, which contained
some WordBasic macros, had one to do that.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA

Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

 

[Suzanne S. Barnhill]

Someone could undoubtedly write a macro to do this. It's obviously a popular
function; I think one of the first Word books I ever owned, which contained
some WordBasic macros, had one to do that.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA

Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

 

[Graham Mayor]

Sub Transpose()
'put the cursor between the characters to transpose
With Selection
.MoveRight Unit:=wdCharacter, _
Count:=1, Extend:=wdExtend
.Cut
.MoveLeft Unit:=wdCharacter, Count:=1
.PasteAndFormat (wdPasteDefault)
End With
End Sub

See http://www.gmayor.com/installing_macro.htm Assign to (say) ALT+T

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

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[Graham Mayor]

Sub Transpose()
'put the cursor between the characters to transpose
With Selection
.MoveRight Unit:=wdCharacter, _
Count:=1, Extend:=wdExtend
.Cut
.MoveLeft Unit:=wdCharacter, Count:=1
.PasteAndFormat (wdPasteDefault)
End With
End Sub

See http://www.gmayor.com/installing_macro.htm Assign to (say) ALT+T

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

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>