Discussion :

[lezinve]

Bonjour à toutes et à tous,

Je cherche à pouvoir dissocier des feuilles Excel à l'aide d'une macro.
Je bosse sous Execl 2003.

Merci d'avance et à charge de revanche

[benoist]

Dissocier???
Qu'est ce que tu entends par dissocier. faire un copier-coller d'une feuille dans un autre fichier?

[lezinve]

Non, je précise dsl.

Avec un clic doit sur un onglet on peut sélectionner ttes les feuilles.
Quand ttes les feuilles sont selectionnées, avec un un nouveau ckic droit on peut les dissocier, dé-selectionner l'ensemble.
J'ai bien essayé en enregistrant une macro mais le code n'est pas donné...

[benoist]

Code :

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

1
2
3
4
5
6
7
 
dim sname as string
sname = ThisWorkbook.ActiveSheet.Name
Sheets(Array("Feuil3", "Feuil2", "Feuil1")).Select
'traitement
Sheets(sname).Select
'retour sous la feuille origine

Ce petit code te permet de tout selectionner et ensuite de revenir sous ta feuille d'origine.

[lezinve]

Merci bcp, ça marche parfaitement