Récupérer texte du presse-papiers et coller avec un Ctrl+V
Bonjour.
C'est un sujet qui semble récurent mais je souhaiterai un peu d'aide dessus.
J'ai ce code pour charger un texte dans le clipboard.
Sub Charger_clipboard()
Dim Texte As String
Dim MyData As New DataObject
Texte = "Texte à copier"
MyData.SetText Texte
MyData.PutInClipboard
End SubMais voilà, quand je fais un Ctrl + V dans un mail, en vue d'envoyer la valeur ainsi récupérée, ça me fait un "??" (voir image.)
Merci pour l'aide.
Bonjour,
Tu déclares mal l'objet "MyData"
Essaie ainsi :
Sub Charger_clipboard()
'Nécessite la référence Microsoft Forms 2.0 Object Library
Dim Texte As String
Dim MyData As Object
Set MyData = New DataObject
Texte = "Texte à copier"
MyData.SetText Texte
MyData.PutInClipboard
End SubBon courage
Merci pour la coquille. Je ne l'avais pas vue.
Mais ce n'est pas ça. Il y a autre chose.
Re-,
Pour ma part, avec Outlook, lorsque je déroule ce code, et que je fais Ctrl + V dans un mail, cela fonctionne...
???
Edit, format du texte "HTML"...
Bah pour moi, ça ne fonctionne pas.
Je ne pige pas pourquoi