Presse-papier
Le
milloche
Bonjour le forum
Peut-on, par macro, entrer une valeur dans le presse-papier SANS passer par
la fonction copier.
Genre presse-papier="toto" ou presse-papier V,40 ou
presse-papier)/08/09
Puis la coller par les moyens habituels.
Encore une drôle de question,non?
Merci.
Peut-on, par macro, entrer une valeur dans le presse-papier SANS passer par
la fonction copier.
Genre presse-papier="toto" ou presse-papier V,40 ou
presse-papier)/08/09
Puis la coller par les moyens habituels.
Encore une drôle de question,non?
Merci.
Poser une question
oui, on doit le faire en deux étapes.
la première étape est de mettre le texte dans une variable DataObject
et la deuxième de charger le DataObject dans le presse-papiers de Windows
Dim DataObj As New MSForms.DataObject
Dim S As String
S = "Hello World"
DataObj.SetText S
DataObj.PutInClipboard
isabelle (ps/ merci à CPearson
http://www.cpearson.com/Excel/clipboard.aspx)
milloche a écrit :
Oui, c'est possible. Pour du texte uniquement (mais on peut passer
n'importe quoi en string et le reconvertir ensuite).
Quelques exemples :
http://frederic.sigonneau.free.fr/c...apiers.txt
http://frederic.sigonneau.free.fr/c...Object.txt
FS
--
Frédéric SIGONNEAU
Modules et modèles pour Excel :
http://frederic.sigonneau.free.fr/
milloche a écrit :
Pas trop compris.
Pas de sub ou end sub
Et ou je les met ces 4 lignes ?
<]:o))
"isabelle" a écrit dans le message de news:
il faut ajouter la référence à Microsoft Forms 2.0 Object Library
(FM20.DLL)
isabelle
isabelle a écrit :
Sub Macro1()
Dim DataObj As New MSForms.DataObject
Dim S As String
S = "Hello World"
DataObj.SetText S
DataObj.PutInClipboard
Range("A1") = DataObj.GetText
End Sub
et il faut ajouter la référence à Microsoft Forms 2.0 Object Library
(FM20.DLL)
isabelle
isabelle
milloche a écrit :