Macro to copy selected cell and paste value

[graiggoriz]

Hello,

I use few cells with formula and I would need when I click on the cell to run a macro that would copy the selected cell and do a paste value.

Would you know how to do that?

Thanks,
Graig

[RudiS]

You can use this code in a standard module, and then add a button to your Quick Access Toolbar that will run the macro. The selected cells will then be converted to values.

Sub PasteVals()
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False
End Sub

Another quick trick without the need for the macro is to:
1. Select the cells to convert to values
2. Move your mouse over the border of the selected
3. Drag the range (with the right mouse button) off the selection and immediately back on the selection (without releasing the right mouse button)
4. In the context menu that pops up, select "Copy here as values".

[graiggoriz]

Many Thanks! Perfect!