presse-papiers avec access97-vba

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.

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.