Copier-coller la sélection unique d'une listbox
Bonjour,
J'ai un formulaire qui me renvoit plusieurs réponses possibles dans une listbox.
Je souhaite en selectionner une et avoir la possibilitée de copier-coller ma sélection ailleurs.
J'ai pensé à cela :
Code:
1
2
3
4
5
6
7
8
9
10
| Private Sub lot_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Dim NumCopie As String
If KeyAscii = 3 Then
NumCopie = lot.List(lot.ListIndex)
With New DataObject
.SetText NumCopie
.PutInClipboard
End With
End If
End Sub |
Je ne trouve pas vraiment où cela cloche en fait. Existe - il une possibilitée via les propriétés de la Listbox ?
Merci d'avance
