New DataObject et réf.Microsoft Forms 2.0 Object Library

Bonsoir à tous,

Je viens vers vous pour tenter de résoudre une énigme :

Je souhaite utiliser un DataObject pour utiliser le presse-papier, mais j'ai le message d'erreur suivant :

Alors que j'ai bien coché la référence :

Microsoft Forms 2.0 Object Library

Pourriez-vous m'expliquer pourquoi cela ne marche pas ?

Par avance, merci pour votre aide et support !

Bonne soirée !

Le code :

Sub testlv()

    Sheets("Erreurs Saisie Utilisateur").Select

    Dim objetProvisoire As DataObject
    Set objetProvisoire = New DataObject
    oDataObject.SetText "ceci est un test"
    oDataObject.PutInClipboard

    ActiveSheet.Paste
End Sub

Bonjour,

code pour utiliser le presse-papier

Dim MSForm As Object
Dim presse_papier As String

    'récupération presse-papier
     Set MSForm = New DataObject
    MSForm.GetFromClipboard
    presse_papier = MSForm.GetText
    Set MSForm = Nothing

    'vidage presse-papier
     Set MSForm = New DataObject
    MSForm.SetText ("")
    MSForm.PutInClipboard
    Set MSForm = Nothing

    'alimentation presse-papier
     Set MSForm = New DataObject
    MSForm.SetText (presse_papier)
    MSForm.PutInClipboard
    Set MSForm = Nothing