Sujet Précédent Sujet Suivant

Copier un onglet, le recopier et le renommer

Résolu/Fermé
Luke94 Messages postés 61 Date d'inscription jeudi 22 novembre 2012 Statut Membre Dernière intervention 13 novembre 2023 - 20 déc. 2014 à 20:50
Luke94 Messages postés 61 Date d'inscription jeudi 22 novembre 2012 Statut Membre Dernière intervention 13 novembre 2023 - 22 déc. 2014 à 15:31
Bonjour,

je dispose d'un fichier Excel avec quelques onglets. L'un des onglets s'appelle ER1.
J'aurai besoin que la macro (bouton dispo sur la feuille en question) recopie la feuille en entier, la colle juste à côté de l'onglet ER1 et la renomme ER2.

Enfin, j'ai besoin d'avoir la même macro disponible sur la feuille ER2 pour créer un nouvel onglet ER3, de la même manière, etc...

J'ai bien essayé quelques macros mais je ne parviens pas à créer ce nouvel onglet juste à côté de celui qui le crée. En effet, j'ai d'autres onglets après ER1 et il ne faut pas que ER2 soit placé à la fin des onglets.

Merci d'avance pour vos réponses !

2 réponses

Réponse 1 / 2
via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 2 702
20 déc. 2014 à 21:14
Bonsoir

Essaie ce code : 
Sub copie()
    ActiveSheet.Select
    nom = ActiveSheet.Name
    num = Val(Right(nom, Len(nom) - 2)) + 1
    ActiveSheet.Copy After:=Sheets(nom)
    Sheets(nom & " (2)").Select
    Sheets(nom & " (2)").Name = "ER" & num
End Sub


Cdlmnt
0

Discussions similaires

Copier et renommer une feuille selon des Box
Emilie -
Emilie -

4 réponses
Macro pour copier une feuille et renommer
nemotri -
nemotri -

14 réponses
Changer le nom de HDMI 1 et HDMI 2
darius5959 -
Aleks -

10 réponses
Scinder/renommer un PDF grâce aux numéros de pages et en-tête
Fuine0069 -
Morgane -

5 réponses
renommer et enregistrer automatiquement fichier en fonction de son contenu
bansan9o6 -
Whismeril -

6 réponses
Renommer un grand nombre de pdf différemment?
pasdouéemaisçapeuts'arranger -
JvDo -

9 réponses