Couper, copier, coller dans une textbox
Contenu du snippet
Soit une feuille (form1) qui contient trois boutons (couper, copier, coller) et une zone de texte (text1) dont les propriétés "Multiline" et "Scrollbars" ont respectivement pour valeur "True" et "Vertical".
Ensuite on peut sélectionner du texte dans form1.text1 et le couper, le copier ou le coller à l'aide des trois boutons.
Ce code ne fonctionne pas avec les RichTextBox.
Voir "Couper, Copier, coller dans une RichTextBox".
Source / Exemple :
' on affecte les codes suivants aux boutons : Private Sub couper_Click() Form1.Text1.SetFocus SendKeys "^X" End Sub Private Sub copier_Click() Form1.Text1.SetFocus SendKeys "^C" End Sub Private Sub Coller_Click() Form1.Text1.SetFocus SendKeys "^V" End Sub
Conclusion :
Ensuite on peut sélectionner du texte dans form1.text1 et le couper, le copier ou le coller à l'aide des trois boutons.
Ce code ne fonctionne pas avec les RichTextBox.
Voir "Couper, Copier, coller dans une RichTextBox".
A voir également
- Couper, copier, coller dans une textbox
- Vba copier coller dans une autre feuille ✓ - Forum Visual Basic
- Copier coller valeurs d'une feuille vers une autre feuille à partir de la premiè ✓ - Forum Visual Basic 6
- Vba coller valeur cellule sur une autre cellule avec variable ✓ - Forum Visual Basic 6
- Copier cellule dans autre feuille (vba) - Forum Visual Basic
- Couper coller vba ✓ - Forum Visual Basic 6
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.