Bonjour,
Je cherche a utiliser le bout de code suivant (le but est de mettre dans le press papier sans aucun formatage)
1 2 3 4
| Dim MyData As DataObject
Set MyData = New DataObject
MyData.SetText ActiveCell, Format:=1
MyData.PutInClipboard |
Il fonctionne tres bien mais il réclame que la référence "Microsoft Forms 2.0 Object Library" soit cochée
Je cherche donc une facon de la cocher si elle n'est pas déja cochée pour le wordbook
Apres avoir un peu cherché, je pensais m'en tirer avec ce code
ThisWorkbook.VBProject.References.AddFromFile ("C:\WINDOWS\system32\FM20.DLL")
L'adresse vient de ce qui apparait quand je vais manuellement dans référence et que je le coche moi meme
Mais je me prend une erreur 1004 dans les dents (y compris quand la case n'est pas encore cochée, j'ai bien compris qu'essayer de la cocher si elle est déja cochée fera un message d'erreur)
Qu'est-ce que je fais de mal?
Je le met dans un module et il faudrait le mettre ailleurs?
C'est pas l'adresse qui apparait quand on sélectionne la référence qu'il faut utiliser?
Merci d'avance si quelqu'un sait me dépanner
Partager