Re-Asigning Shortcut Keys

[Sigma_Sam]

I want to Re-Asign a shortcut key function.
For example...
I want to change Ctrl+V = Paste
to Ctrl+V = PasteSpecial-Values
Is this possible ? if yes how.

Thanx in advance

[Robb__]

Sam

Try Application.Onkey. Paste or type this code in a module - I've added comments re which to run.


- Open VBE Alt + {F11}
- From menue Insert/Module
- Put this code in the module

Sub setKey()
'Run this to set the shortcut
Application.OnKey "^v", "PasteSp"
End Sub


Sub Reset()
'Run this to return the shortcut to original
Application.OnKey "^v"
End Sub

Sub PasteSp()
'This is the routine that runs to the shortcut
ActiveCell.PasteSpecial Paste:=xlPasteValues
End Sub

- Run the setKey routine
-Try it out in the workbook

Any help?

Regards

Robb__

[Sigma_Sam]

Hey Robb,

Excellent Solution. Both the Set and Reset Subs worked like a charm. Thanks a million

Sam

PS I you have proplems coying code from this page to Clipboard, copy from Menu:View>Page Source

[Ivan F Moala]

Not to take away from Robbs solution, add
also set cutcopymode to false to clear the clipboard and get rid of the highlighted selection...otherwise there is the possibilty of entering data twice if you use enter straight after.

EG>

Sub PasteSp()

'This is the routine that runs to the shortcut

ActiveCell.PasteSpecial Paste:=xlPasteValues

Application.CutCopyMode = False

End Sub