I put this in a module and ust CTRL Q to activate it.
This one just pastes the values with out the formatting or any formulas that may have been in the origin cell.
'Hope it helps. CODE FOLLOWS::
Public Sub PstSpcl()
' Keyboard Shortcut: Ctrl+q
On Error GoTo ErrorHandler
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Exit Sub
ErrorHandler:
MsgBox (Err.Description)
Resume Next
End Sub
'CODE ENDS
Yours in EXCELent Frustration
KniteMare