Réponse n° 1
--------
le 26/04/2013 : 03:45
par 3Stone
Administrateur
|
Bonjour,
Citation :je recherche une solution qui me permettrait en effectuant un double clic
Oui, mais le problème est que lors de l'événement du double clic, rien n'est encore sélectionné. Ce n'est qu'après que le texte se sélectionne.
C'est la raison pour laquelle il est simple de récupérer tout le contenu, mais moins évident de ne récupérer ainsi que la partie sélectionnée.
Il faut donc ruser... et utiliser un autre événement pour récupérer le texte sélectionné par le double clic 
La méthode consiste donc à déclarer une variable générale dans le formulaire (par défaut elle est limité à la procédure).
Puis, de récupérer la partie sélectionnée dans l'événement "Sur sortie" de la zone de texte source.
Il reste alors à définir l'événement qui permet de coller dans la zone de texte de destination.
En code, cela ressemble donc à ceci :
Code :Option Compare Database
Option Explicit
'/ Variable globale
Dim sCopy As String
Code :Private Sub ZoneDeTexte1_Exit(Cancel As Integer)
'/ La variable est peuplée en sortie de la zone 1
sCopy = ZoneDeTexte1.SelText
End Sub
Code :Private Sub ZoneDeTexte2_DblClick(Cancel As Integer)
'/ On colle la valeur de la variable
ZoneDeTexte2.value = sCopy
End Sub
Remarques:
- pour coller (ou ajouter) la valeur, on peut utiliser un autre événement que le double clic
- il faut adapter les noms "ZoneDeTexte1" et "ZoneDeTexte2", bien sûr.
- il n'y a pas de code dans l'événement double clic
Cordialement,
Pierre(3stone) |
1 membre
- La Charte du Forum
sujet actif
sujet clos
Important!
Nouveau message -
Rectifier message
Clôturer sujet
Remonter 
- Forum
- Questions générale
© 2004-2013 
