Copy paste with clicking

[subtleskeptic]

Hello, searched around this forum couldn't come up with anything...
I'm trying to set up a macro so that I can click any value in a list, copy the value, and click again in any cell to paste special value the entry... in the same worksheet.

any ideas please?
thanks!

 

[Eric W]

Not sure why you'd need a macro for that. All that functionality already exists with the context menu. Just right click the cell you want to copy, select Copy, then right click the cell where you want to paste it, then select the 2nd option under Paste Options.

 

[MickG]

Try this "BeforeRightClick" event
Right click value to "Copy" right click elsewhere to "Paste"

Private [COLOR="Navy"]Sub[/COLOR] Worksheet_BeforeRightClick(ByVal Target [COLOR="Navy"]As[/COLOR] Range, Cancel [COLOR="Navy"]As[/COLOR] Boolean)
Cancel = True
Static Temp [COLOR="Navy"]As[/COLOR] Range
    [COLOR="Navy"]If[/COLOR] Temp [COLOR="Navy"]Is[/COLOR] Nothing [COLOR="Navy"]Then[/COLOR]
        [COLOR="Navy"]Set[/COLOR] Temp = Target
    [COLOR="Navy"]Else[/COLOR]
        Target = Temp
        [COLOR="Navy"]Set[/COLOR] Temp = Nothing
    [COLOR="Navy"]End[/COLOR] If
[COLOR="Navy"]End[/COLOR] [COLOR="Navy"]Sub[/COLOR]

Regards Mick