Menu contextuel dans textbox

[xhudi69]

Bonjour à tous et bonnes vacances

A l'aide du fichier joint je fais énormément de Copier/Coller depuis SAGE Ligne 100 et mon UserForm, notament dans les TextBox 2 et 3

Je n'est pas trouvé dans le Forum la possibilité de faire clic droit sur un TextBox pour avoir le menu contextuel et le Collé, j'épargnerais ainsi mes touches Ctrl et V de mon clavier et échapperais à un problème de Carpien 😉.

Merci à vous tous.

 

[fhoest]

Re : Menu contextuel dans textbox

Bonjour,

Mettre ceci pour exemple textbox14

Private Sub TextBox14_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 2 Then
Application.SendKeys "^+V"
End If
End Sub

A+

 

[xhudi69]

Re : Menu contextuel dans textbox

Bonjour fhoest

Merci pour le code, il fonctionne très bien.

Exellent week-end à toi et à vous tous