Code qui marche sur un fichier et pas sur un autre : mystère ?

[13GIBE59]

Bonjour le forum.

dans un de mes fichiers, je veux placer le contenu de la cellule L3 dans le presse-papiers
à l'ouverture du classeur :

Private Sub Workbook_Open()
Dim MyData As DataObject
Set MyData = New DataObject
MyData.SetText Range("L3").Value
MyData.PutInClipboard
End Sub

Ce code marche très bien.
Mais le même code placé dans un autre fichier bugue sur :

Dim My Data As DataObject

Le message d'erreur est le suivant :

Erreur de compilation :
type défini par l'utilisateur non défini.

Quelqu'un a-t'il une idée pour lever ce mystère, sachant que les deux versions d'Excel sont les mêmes, 2007 ?
Merci d'avance.

 

[camarchepas]

Re : Code qui marche sur un fichier et pas sur un autre : mystère ?

Bonjour ,

Et oui dans un classeur tu as référencé microsoft form et pas dans l'autre ,

un classique de chez classique

 

[13GIBE59]

Re : Code qui marche sur un fichier et pas sur un autre : mystère ?

Bonjour camarchepas,

Merci pour ta réponse,

mais ça marche pas : je n'ai microsoft form ni dans l'un ni dans l'autre...

 

[camarchepas]

Re : Code qui marche sur un fichier et pas sur un autre : mystère ?

Ok , deuxième essai.

Le classeur ou cela ne fonctionne pas n'a pas de userform .

Car dans le cas d'utilisation d'userform la déclaration est automatique .

 

[13GIBE59]

Re : Code qui marche sur un fichier et pas sur un autre : mystère ?

Re,

Super ! Celle-là, je ne la connaissais pas : insérer un userform. Chapeau !

Merci encore, camarche pas, parce que là, ça marche