Copier une feuille dans un autre classeur en changeant la macro Fermé

Question

Bonjour, 
J'ai un fichier "Groupe.xlsm" dans lequel je veux copier un onglet "comptabilité" dans le fichier "Cashflow.xslm".  J'y parviens via une macro.  Voici mon problème. L'onglet comptabilité a deux boutons avec chacun une macro.

J'ai les mêmes macros dans mon fichier Cashflow.  Lorsque je copie ma feuille, les macros restent lié à mon fichier Groupe.  Donc si je clique sur le bouton, une fois la feuille copiée dans mon fichier cashflow, et bien excel ouvre mon fichier groupe pour partir la macro.  Je voudrais que la macro de la feuille ne soit plus liée, mais soit prise dans mon fichier cashflow.

Lorsque je regarde le nom de ma macro: Au lieu de voir apparaitre Groupe.xlsm!Mise_a_jour_extract_hrs_form_tous_mois, je voudrais voir Cashflow.xlsm!Mise_a_jour_extract_hrs_form_tous_mois

Quelqu'un a une idée ?  Merci d'avance

Frenchie83 · Answer

Bonjour
Je suppose que vous faites une copie intégrale de la  feuille "Groupe " vers la feuille "Cashflow". Donc dans ce cas, vous recopiez aussi les boutons, Pour vérifier mes dires, dans la feuille "Cashflow", faites un clic droit sur un  des boutons et déplacez le, si en dessous il y en a d'autres identiques, c'est que c'est bien une copie, supprimez-le et recommencez cette opération jusqu'à atteindre le dernier bouton(qu'il ne faut pas supprimer puisque c'est le bon).
Toujours si c'est ce que je pense, je vous conseille de ne pas faire de copie intégrale de la feuille, mais uniquement de la zone des données, déplacez les boutons hors de cette zone (par exemple sur la ligne des entêtes, attention il ne doivent pas mordre sur la ligne du dessous) . Essayez
Cdlt

Frenchie83 · Answer

Bonsoir
Puisque vous avez les mêmes macros dans le fichier "CashFlow",  faites la correction manuellement, ça prends 5 secondes.
Faites un clic droit sur le bouton , sélectionnez "Affecter une macro" ,  le nom de la macro qui s'affiche est "Groupe.xlsm!Mise_a_jour_extract_hrs_form_tous_mois", 
effacer "Groupe.xlsm!". tout simplement
Cdlt

Frenchie83 · Answer

Bonjour
Avez-vous penser à utiliser l'enregistreur de macro pour faire l'action de copier-coller, et profiter de l'enregistrement pour affecter la bonne macro à vos boutons?
Vous devez obtenir quelque chose du genre 
    ActiveSheet.Buttons.Add(65, 21, 96, 63).Select
    ActiveSheet.Paste
    ActiveSheet.Shapes("Button 1").Select
    Selection.OnAction = "Mise_a_jour_extract_hrs_form_tous_mois"
Attention, l'enregistrement n'est à faire qu'une seule fois, sinon le bouton va s'incrémenter et cela va générer une erreur.
A tester
Cdlt

Frenchie83 · Answer

Bonjour
-J'ai bien essayé votre suggestion, mais sans succès, le système bloque à Selection.OnAction....... -  et à quel objet attribuez-vous la macro?  lors de l'enregistrement vous avez oublié de sélectionner le bouton pour lui affecter la macro, regardez la constitution de la macro dans le post 5 (que ce soit un bouton de formulaire ou un objet dessiné tel un rectangle n'a pas d'importance).
- le bouton perd son nom (celui que j'ai inscris dessus)  - Toujours avec l'enregistreur de macro vous devez retaper le nom du bouton et récupérer ainsi le code obtenu. 
- et s'incrémente,il devient bouton 2-  à chaque fois que vous répétez l'opération, le N° du bouton s'incrémente, c'est pour ça que je vous avez dit, toujours dans le post 5,  de ne faire l'opération qu'une seule fois, sinon si vous voulez répéter l'opération, refermez et ré-ouvrez le fichier pour avoir toujours le N°1, il ya la possibilité après recopie de faire un balayage de la nouvelle feuille et de relever les N° des objets (boutons ou autres) et de leurs affecter la macro. Mais là je dois partir.
Cdlt

Copier une feuille dans un autre classeur en changeant la macro

4 réponses

Discussions similaires