Drag & past textbox2 vers textbox3 + coller valeur

H

Hellboy

XLDnaute Accro

• 28 Novembre 2005

• #2

Bonsoir carlos

Je ne sais pas si c'est ne bonne façon de faire, mais bon voici comment je m'y suis pris. J' ai rajouté une ligne dans ton module de classe et dans cette procédure:

Private Sub Listb_BeforeDropOrPaste(ByVal Cancel As MSForms.ReturnBoolean, _
ByVal Action As MSForms.fmAction, ByVal Data As MSForms.DataObject, _
ByVal X As Single, ByVal Y As Single, ByVal Effect As MSForms.ReturnEffect, ByVal Shift As Integer)
        Cancel = True
        Effect = 1
        listb.AddItem Data.GetText
        ThisWorkbook.ActiveSheet.Cells(1, 1).Value = Data.GetText
End Sub

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

C

carlos

XLDnaute Impliqué

Supporter XLD

• 28 Novembre 2005

• #3

Rerag & past textbox2 vers textbox3 + coller val

Bonjour Hellboy

tu travailles tard ou tres tot !!!

Mais le resultat est là.

Merci
Carlos

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 28 Novembre 2005

• #4

Rerag & past textbox2 vers textbox3 + coller val

Bonjour Carlos, HellBoy

En fait, si je ne m'abuse, notre ami HellBoy de Service qui veille la nuit contre les démons du VBA, est originaire du Canada, ceci ce confirme par son drapeau du Québec.

Et sinon j'ai eu l'occasion de jouer avec les 'Drag And Drop' à plusieurs reprises sur le Forum First Generation, voici des liens où tu trouveras des démos :

Lien supprimé

Lien supprimé

Cette dernière devrait t'interresser au niveau de l'envoi des données vers une feuille.

Bonne Journée
[ol]@+Thierry[/ol]

 

Vote positif 0 Vote négatif

H

Hellboy

XLDnaute Accro

• 28 Novembre 2005

• #5

Rerag & past textbox2 vers textbox3 + coller val

Bonjour Carlos, _Thierry


LOL _Thierry.

 

Vote positif 0 Vote négatif

C

carlos

XLDnaute Impliqué

Supporter XLD

• 28 Novembre 2005

• #6

Rerag & past textbox2 vers textbox3 + coller val

Bonsoir le forum , bonsoir Hellboy , Bonsoir Thierry


Merci pour ces deux fils conducteurs.

Je m'étais d'ailleurs servi du premier pour construire mon fichier .
C'etait une aide tres precieuse .

Par contre le second fil ne donne rien de précis sauf ce lien :

Lien supprimé

qui n'ouvre pas un fichier mais que des caracteres tres bizarres ..?

Merci

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 28 Novembre 2005

• #7

Rerag & past textbox2 vers textbox3 + coller val

RE Bonjour à tous

Heureux de t'avoir fait rigoler HellBoy

Pour le Zip... je pense que tu n'as pas la même version WinZip car ici le lien fonctionne bien et m'ouvre bien un fichier Zippé : USF_Drag_N_Drop_Planning-V01.00.xls (WinZip(R) Version 8.1 (4331))

Bonne Soirée
[ol]@+Thierry[/ol]

 

Vote positif 0 Vote négatif

C

carlos

XLDnaute Impliqué

Supporter XLD

• 28 Novembre 2005

• #8

Rerag & past textbox2 vers textbox3 + coller val

Bonsoir le forum , Bonsoir _Thierry

Merci, je mets à jour mon Winzip.

Carlos

 

Vote positif 0 Vote négatif