Creer un nouvel onglet depuis un onglet avec fiche originale
Comme le precise le sujet, je cherche a savoir comment je peux créer une nouvelle fiche (onglet) en me servant d'une fiche originale (dans un onglet que je ne veut pas que les gens y accedent).
C'était le premier point, et je souhaites faire un tableau de récap. dans le même classeur avec les differentes fiches créer par les gens, et les divers points que je veux faire apparaitre.
J'espère avoir été assez clair et vous remercie d'avance pour vos réponses.
Merci.
Bonsoir et bienvenue sur ce forum,
deux méthodes peuvent être utilisées :
1. Méthode sans VBA
- Clique sur l'onglet de ta feuille à dupliquer
- Tout en appuyant sur le bouton de ta souris, appuies sur la touche CTRL de ton clavier (tu vois un petit + sur l'onglet)
- En conservant le "+3, déplace l'onglet après une autre feuille
- Relache le tout pour voir ta nouvelle feuille ainsi dupliquée
2. Méthode avec VBA
- Utilise ce code à placer dans un module en VBA et à associer à un bouton
Sub duplique()
Sheets("Feuil1").Copy after:=Sheets("Feuil2")
End subDans ce cas, on duplique la feuille 1 après la feuille 2
Pour ce qui est de ton deuxième point, je ne vois pas trop ce que tu veux faire d'après ce que tu expliques.
Amicalement
Dan
Bonjour à tous et toutes,
Une chtite question à Nad-Dan, stp avec le code VBA est-il possible de dupliquer non pas après la feuille 2 mais en fin de classeur ?
Désolé pour l'intrusion Echo28.
Cdlt,
.
Re,
Oui Billane en remplaçant
Sheets("Feuil2")apr
Sheets(Sheets.Count)Amicalement
Dan
Re,
WHOA, Nad-Dan, quelle rapidité.
Merci
Cdlt,
.
Bonjour,
Je souhaiterai savoir comment modifier la dernière fonction pour intégrer les "n" onglets suivants.
Faut-il boucler en rentrant le nombre d'onglets ?
D'avance merci.
Edit dan : je n'ai pas compris ta question mais pourquoi ne pas ouvrir un nouveau fil car celui-ci est terminé.
Bonjour Rdeug,
Rdeug a écrit :Je souhaiterai savoir comment modifier la dernière fonction pour intégrer les "n" onglets suivants.
Faut-il boucler en rentrant le nombre d'onglets ?
D'avance merci.
Si je comprends bien , ce que tu veux c'est que ton nouvel onglet se posisionne par exemple après le n°10 , si c'est le cas,
Sub duplique()
Sheets("Feuil1").Copy after:=Sheets("n°10")
End sub OOPS Dan j'avais pas vu ton édit
Cdlt,