R Click paste/copy in an textbox userform

Hello everybody,

I`m trying to alow a user to use right and left click in an userform textbox to paste information, using ctrl V does the job done. I`m fairly new to VBA programming and managed to find the code underneath to do this. The code displays the option to copy or paste but then nothing else happens, no text is copied or pasted. Can you help me with this?

Sub MakePopUp()

On Error Resume Next
CommandBars("MyPopUp").Delete
On Error GoTo 0

With CommandBars.Add(Name:="MyPopUp", Position:=msoBarPopup)
.Controls.Add Type:=msoControlButton, ID:=19
.Controls.Add Type:=msoControlButton, ID:=22
End With

End Sub
Private Sub Text1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

MakePopUp
If Button = 2 Then
Application.CommandBars("MyPopUp").ShowPopup
End If

End Sub

Moderator's note: Please take the time to review our rules. There aren't many, and they are all important. Rule #3 requires code tags. I have added them for you (and removed the unreadable color) this time because you are a new member. --6StringJazzer

Thank You,
Chris