macro indépendante de la feuille

[maryse.lh]

Bonsoir le forum,

j'ai une question à priorie toute bête. Dans un classeur j'utilise la macro suivante:

Sub CopyC5()
Range('C5').Select
Worksheets('feuille1').OLEObjects('Objet 171').Verb
Selection.Copy
End Sub

comment faire pour rendre cette macro utilisable indépendamment de la feuille (feuille2,3...) afin d'éviter de la réécrire pour chaque feuille ?
Je n'ai rien trouvé dans les anciens post...

Merci

 

[JC de Lorient]

salut Maryse, le forum

simplement en mettant ta macro dans un module et non dans la feuille !


JC

 

[porcinet82]

Salut maryse.lh, JC de Lorient,

Je rajouterai a la reponse de JC, la moficiation suivante :

Activesheet.OLEObjects('Objet 171').Verb

au lieu de

Worksheets('feuille1').OLEObjects('Objet 171').Verb

@+

 

[maryse.lh]

Merci de vos réponses JC et porcinet82,

mais hélas cela ne fonctione pas, mes macros sont bien dans un module et j'ai changé Worksheets('feuille1') par Activesheet...
Cela peut il venir du fait que 'Objet 171' est inséré dans 'feuille1' ?