copy an offset value when select

Dear all,

I have a sheet content a column cusip and a column proceed amount. I
want to know how to write a VBA when I right click cusip cell and it
will auto copy the offset cell, assume 2 column right beside it,
value.
I want to combine this 2 movement in one VBA, if any one know how to.

I have a Bloomberg VBA will execute when I first right click cusip
cell:

Sub CPD()
BBfunction = "CPD"
Call bbfunctioncall(BBfunction)
End Sub

If anyone have idea, please give me a hint, thanks a lot.

Vincent