Correct mistyping (mild dyslexia)

When typing it is easy to either go too fast or type letters in the wrong order. This may be a mild form of dyslexia, but if only occasional is probably nothing more than being too hasty. Either way, a simple VBA macro can correct the wrongly ordered characters easily.

Sub Swap2Letters()
'
' Swap2Letters Macro
' Macro by Alan Rolfe
'
    ' Cancel any existing selection
    Selection.Start = Selection.End

    ' Create & cut new 1 character selection to left of cursor
    Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
    Selection.Cut

    ' Move back 1 character and paste
    Selection.MoveLeft Unit:=wdCharacter, Count:=1
    Selection.Paste

    ' Return to original position
    Selection.MoveRight Unit:=wdCharacter, Count:=1

End Sub

This code simply switches over the last two characters before the cursor.

For example, if you typed teh and ran the macro when the cursor is after the h, it would correct it to the.

By assigning the macro to a keyboard shortcut this can all be achieved quickly and without leaving the keyboard.

Comments