Couper, copier, coller dans une textbox

Soyez le premier à donner votre avis sur cette source.

Snippet vu 16 826 fois - Téléchargée 79 fois

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".

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

Ajouter un commentaire

Commentaires

DASSMC
Messages postés
1
Date d'inscription
samedi 14 mai 2011
Statut
Membre
Dernière intervention
5 juin 2011

mais clipboard.clear
c pour copier tout le textbox mais si on veut choisir une partie selectionnée on fait comment?
mySQL15
Messages postés
79
Date d'inscription
samedi 5 novembre 2005
Statut
Membre
Dernière intervention
28 août 2010

copié du texte:

Clipboard.Clear
Clipboard.SetText (Text1)
phantattoo
Messages postés
6
Date d'inscription
samedi 3 novembre 2007
Statut
Membre
Dernière intervention
12 novembre 2007

bonjour...j'aimerai coder une sorte de bouton volant qui me permettrai de coller un morceau de texte de mon application dans word par exemple.
j'arrive a copier mais helas, je ne peux coller nul part ailleur que dans ma propre application!
pourriez vous m'aider...merci
sylvanox
Messages postés
19
Date d'inscription
samedi 5 novembre 2005
Statut
Membre
Dernière intervention
22 mai 2016

Merci exactement ce que je cherchais :)
Err.
51 <> Cinquante un...
à améliorer
je dispose d'une version complète!

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.