Presse-papiers avec access97-vba

Signaler
Messages postés
3
Date d'inscription
mardi 29 janvier 2002
Statut
Membre
Dernière intervention
5 août 2002
-
cs_Ouneufe
Messages postés
60
Date d'inscription
mardi 4 septembre 2001
Statut
Membre
Dernière intervention
19 janvier 2009
-
je sais qu'il existe un objet pour utiliser le presse-papiers sous vb6 (clipboard) mais je cherche la même chose sous vba access97 , donc pouvoir utiliser le presse-papier.
Merci. :)

1 réponse

Messages postés
60
Date d'inscription
mardi 4 septembre 2001
Statut
Membre
Dernière intervention
19 janvier 2009

Dim MyData As DataObject

Private Sub CommandButton1_Click()
Set MyData = New DataObject

MyData.SetText TextBox1.Text
MyData.PutInClipboard

TextBox2.Paste
End Sub

Private Sub UserForm_Initialize()
TextBox1.Text = "Move this data to a " _
& "DataObject, to the Clipboard, then to " _
& "TextBox2!"
End Sub

le feu ça fait peur mais avec l'eau tu l'arrêtes, le feu.
L'eau, tu l'arrêtes pas.