Discussion :

[elwy07]

Bonjour,

je cherche à rassembler dans une macro complémentaire tous mes bouts de code afin de toujours les avoir de disponible quelque soit le classeur excel ouvert.

Jusque la pas de problème de création de macro complémentaire, et de regroupement de code.

La ou je ne ne comprend pas c'est pourquoi un code me permettant de copier dans le presse papier le contenu d'une colonne, qui marche tres bien à la base, si je le place dans ma macro complémentaire il ne veux plus marcher.

J'ai l'erreur: Erreur de compilation Type défini par l'utilisateur non défini

J'ai juste fait un copier coller du code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub vedelec()
    Dim oDO As New DataObject
 
        oDO.SetText Join(Application.Transpose(Cells(1).CurrentRegion.Columns(2)))
        oDO.PutInClipboard
 
       Set oDO = Nothing
 
End Sub

Ce code n'est pas de moi. Une gentille personne de ce forum m'avait aidé

Si sa peu aidé je vous joint ma macro complémentaire (y a rien de secret) et le fichier dans lequel se trouve le bout de code que je veux placer dans ma macro
Complementaire elwy.rar
vedelec.rar

j'ai du les compresser car sinon ils étaient pas acceptés

Quelqu'un peut il me dire pourquoi ce bout de code marche dans le fichier Vedelec.xltm et pas dans mon fichier Complementaire elwy.xla

Merci

[Marc-L]

Bonjour,

vu le message une référence est activée dans l'un et pas dans l'autre …

_________________________________________________________________________________________________________

Je suis Paris, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[elwy07]

ok, mais sa veut dire que j'ai oublié de faire quelque chose?

[Marc-L]

A tout le moins comparer via le menu Outils du VBE les références activées de chaque projet (classeur) …

[joe.levrai]

Sinon, passer en liaison tardive pour éviter ces tracas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim oDO As Object
Set oDO = createobject("msforms.dataobject")

[elwy07]

mais oui maintenant sa fait tilt.

il me reste à le trouver car il n'y est pas dans excel 2010

Merci de ton aide

[elwy07]

A y est trouvé, installé tout marche

Encore Merci