XL 2013 copier coller en provenance de combobox, textbox evrs une autre textbox

[poussain]

Bonjour à tous,
Je cherche a effectuer l'action suivante par double clic :

je n'arrive pas a mettre les éléments les un derrière les autres en suivant l'ordre
suivant :
Date, type de vol ( choix entre entrainement ou prorogation), le contenu de la combobox6 ( ex : maniabilité), le FI (combox1 ex PSN), le type avion (ex c 172 g100 dans combobox 2, les vent, direction et vitesse, respectivement dans textbox TextBoxWindDir et TextBoxWindSpeed

J'ai essayé ce code mais je ne rapatrie que la date .
je sollicite votre aide pour correction en vous remerciant par avance.
Ph.


Private Sub Txtvol2_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
With TxtDate
.SelStart = 0
.SelLength = .TextLength
.Copy
End With
With ComboBox6
.SelStart = 1
.SelLength = .TextLength
.Copy
End With
With ComboBox1
.SelStart = 2
.SelLength = .TextLength
.Copy
End With
With ComboBox2
.SelStart = 3
.SelLength = .TextLength
.Copy
End With
With TextBoxWindDir
.SelStart = 4
.SelLength = .TextLength
.Copy
End With

Txtvol2.Paste

End Sub

 

[Hasco]

Bonjour,

Eu la flemme de rechercher votre code du post #1 dans vos userForm alors je suppose que :
Txtvol2 = TxtDate.Text & " " & Combobox6.Value & " " & Combobox1.Value & " " & Combobox2.Value & " " &TextBoxWindDir.Text

Vous pouvez remplacer les & " " & par & VbLf & pour un textbox multiline.

Bonne soirée

 

[poussain]

Merci Beaucoup Roblochon c'est exactement ce que je cherchais..et cela fonctionne; j'avais compris qu'il y avait une fonction dite "chariot" avec l' expression & VbLf & si je ne me trompe pas, mais je n'avais pas saisi la subtilité de ce que vous m'avez indiqué .
C'est vraiment chouette d'avoir pris le temps.
Bonne soirée.
Ph.