Modifier automatiquement le nom de plusieurs onglets excel
Résolu/Fermé
Tyrese3
Tyrese3
- Messages postés
- 15
- Date d'inscription
- vendredi 28 juin 2013
- Statut
- Membre
- Dernière intervention
- 21 octobre 2013
Tyrese3
- Messages postés
- 15
- Date d'inscription
- vendredi 28 juin 2013
- Statut
- Membre
- Dernière intervention
- 21 octobre 2013
A voir également:
- Modifier automatiquement le nom de plusieurs onglets excel
- Modifier automatiquement le nom de plusieurs onglets excel ✓ - Forum - Excel
- Comment Modifier automatiquement dans deux fichiers Word ou exel ✓ - Forum - Word
- Nom de l'onglet excel ✓ - Forum - Excel
- Nom onglet excel automatique ✓ - Forum - Excel
- Renommer automatiquement une feuille d'après une cellule - Forum - Excel
4 réponses
pijaku
28 juin 2013 à 11:48
- Messages postés
- 12257
- Date d'inscription
- jeudi 15 mai 2008
- Statut
- Modérateur
- Dernière intervention
- 3 septembre 2021
28 juin 2013 à 11:48
Bonjour,
Pour cela, il faudrait en savoir plus :
- dans ton classeur tu n'as que 13 feuilles et pas une de plus?
- Comment s'appelle la feuil13?
- La feuil13 ne changera pas de nom?
Sache aussi qu'il est possible de faire cela automatiquement en fonction de l'année en cours, pas besoin de mettre des formules en feuil13...
Pour cela, il faudrait en savoir plus :
- dans ton classeur tu n'as que 13 feuilles et pas une de plus?
- Comment s'appelle la feuil13?
- La feuil13 ne changera pas de nom?
Sache aussi qu'il est possible de faire cela automatiquement en fonction de l'année en cours, pas besoin de mettre des formules en feuil13...
Tyrese3
28 juin 2013 à 14:51
- Messages postés
- 15
- Date d'inscription
- vendredi 28 juin 2013
- Statut
- Membre
- Dernière intervention
- 21 octobre 2013
28 juin 2013 à 14:51
Bonjour,
Je te remercie pour ton aide. Voici la réponse à ta demande:
Au total j'aurai 15 feuilles.
- Feuille n°1 Nommée Maj_Onglets (C'est là que va se trouver mon bouton VBA, donc le nom de cette feuille restera inchangé)
- Feuille n°2 Nommée CADRAGE TVA (Le nom de cette feuille restera inchangé)
- Feuilles n°3 à 14 nommées: 01-13; 02-13; 03-13; 04-13; 05-13; 06-13; 07-13; 08-13; 09-13; 10-13; 11-13; 12-13. (ce sont ces feuilles qui devront changer de noms automatiquement)
- Feuilles n°15 Nommée Noms_SocT&Bques (Le nom de cette feuille restera inchangé)
Effectivement, si l'année peut être changée automatiquement en fonction de l'année en cours je suis preneur. Par contre, je souhaiterais avoir si c'est possible uniquement les deux derniers chiffres de l'année en cours. Exemple: 01-13 deviendra 01-14.
Ne faut-il pas que mes feuilles soient plutôt datées de 2012 au lieu de 2013 pour pouvoir faire un test après ta réponse ?
Cordialement,
Tyrese3
Je te remercie pour ton aide. Voici la réponse à ta demande:
Au total j'aurai 15 feuilles.
- Feuille n°1 Nommée Maj_Onglets (C'est là que va se trouver mon bouton VBA, donc le nom de cette feuille restera inchangé)
- Feuille n°2 Nommée CADRAGE TVA (Le nom de cette feuille restera inchangé)
- Feuilles n°3 à 14 nommées: 01-13; 02-13; 03-13; 04-13; 05-13; 06-13; 07-13; 08-13; 09-13; 10-13; 11-13; 12-13. (ce sont ces feuilles qui devront changer de noms automatiquement)
- Feuilles n°15 Nommée Noms_SocT&Bques (Le nom de cette feuille restera inchangé)
Effectivement, si l'année peut être changée automatiquement en fonction de l'année en cours je suis preneur. Par contre, je souhaiterais avoir si c'est possible uniquement les deux derniers chiffres de l'année en cours. Exemple: 01-13 deviendra 01-14.
Ne faut-il pas que mes feuilles soient plutôt datées de 2012 au lieu de 2013 pour pouvoir faire un test après ta réponse ?
Cordialement,
Tyrese3
pijaku
28 juin 2013 à 14:54
- Messages postés
- 12257
- Date d'inscription
- jeudi 15 mai 2008
- Statut
- Modérateur
- Dernière intervention
- 3 septembre 2021
28 juin 2013 à 14:54
T'inquiètes pour le test.
Par contre, automatiquement, voudra néanmoins dire avec clic de ta part sur un bouton.
C'est possible que cela soit tout auto, sans clic, mais je préfères que d'abord l'utilisateur vérifie s'il a tout fait avant de procéder à un changement (sauvegardes par exemple)...
Par contre, automatiquement, voudra néanmoins dire avec clic de ta part sur un bouton.
C'est possible que cela soit tout auto, sans clic, mais je préfères que d'abord l'utilisateur vérifie s'il a tout fait avant de procéder à un changement (sauvegardes par exemple)...
pijaku
28 juin 2013 à 15:11
- Messages postés
- 12257
- Date d'inscription
- jeudi 15 mai 2008
- Statut
- Modérateur
- Dernière intervention
- 3 septembre 2021
28 juin 2013 à 15:11
Le code :
Le classeur exemple :
Format Excel 2007 et+
Format 97-2003
Option Explicit Sub Renommer_Feuilles() Dim Feuille As Worksheet For Each Feuille In ThisWorkbook.Worksheets If IsNumeric(Left(Feuille.Name, 2)) Then Feuille.Name = Left(Feuille.Name, 2) & "-" & Right(Date, 2) Next Feuille End Sub
Le classeur exemple :
Format Excel 2007 et+
Format 97-2003
pijaku
28 juin 2013 à 16:30
- Messages postés
- 12257
- Date d'inscription
- jeudi 15 mai 2008
- Statut
- Modérateur
- Dernière intervention
- 3 septembre 2021
28 juin 2013 à 16:30
Ne jamais placer de données confidentielles sur un forum.
Si tu souhaites que je t'explique comment mettre en place cette macro et son bouton, demande le...
Si tu souhaites que je t'explique comment mettre en place cette macro et son bouton, demande le...
Tyrese3
28 juin 2013 à 16:56
- Messages postés
- 15
- Date d'inscription
- vendredi 28 juin 2013
- Statut
- Membre
- Dernière intervention
- 21 octobre 2013
28 juin 2013 à 16:56
Je te remercie pour cette information et ta réactivité. Néanmoins, jamais enlevé tous éléments sensibles.
Merci pour ton professionnalisme.
Je veux bien que tu m'expliques comment mettre en place cette macro et son bouton.
Merci pour ton professionnalisme.
Je veux bien que tu m'expliques comment mettre en place cette macro et son bouton.
pijaku
29 juin 2013 à 09:04
- Messages postés
- 12257
- Date d'inscription
- jeudi 15 mai 2008
- Statut
- Modérateur
- Dernière intervention
- 3 septembre 2021
29 juin 2013 à 09:04
1- ouvre ton classeur
2- dessines un bouton dans la feuille concernée !!! utilise un contrôle activeX pas un bouton de formulaire (ruban développeur / insérer /contrôles activex/bouton de commande)
3- double clic sur le bouton => une fenêtre vbe s'ouvre avec ces lignes:
4- entre ces deux lignes saisir : Renommer_Feuilles
tu obtiens donc :
5- toujours sous vbe : Insertion/Module
6- dans le module ainsi créé, copie-colle le code :
7- ferme la fenêtre vbe
8- enregistre sous un autre nom ton classeur en choisissant le type Classeur excel (prenant en charge les macros)
9- sortir du mode création (ruban développeur/Mode création)
10- teste en cliquant sur le bouton
2- dessines un bouton dans la feuille concernée !!! utilise un contrôle activeX pas un bouton de formulaire (ruban développeur / insérer /contrôles activex/bouton de commande)
3- double clic sur le bouton => une fenêtre vbe s'ouvre avec ces lignes:
Private Sub CommandButton1_Click() End Sub
4- entre ces deux lignes saisir : Renommer_Feuilles
tu obtiens donc :
Private Sub CommandButton1_Click() Renommer_Feuilles End Sub
5- toujours sous vbe : Insertion/Module
6- dans le module ainsi créé, copie-colle le code :
Option Explicit Sub Renommer_Feuilles() Dim Feuille As Worksheet For Each Feuille In ThisWorkbook.Worksheets If IsNumeric(Left(Feuille.Name, 2)) Then Feuille.Name = Left(Feuille.Name, 2) & "-" & Right(Date, 2) Next Feuille End Sub
7- ferme la fenêtre vbe
8- enregistre sous un autre nom ton classeur en choisissant le type Classeur excel (prenant en charge les macros)
9- sortir du mode création (ruban développeur/Mode création)
10- teste en cliquant sur le bouton
Tyrese3
Modifié par Tyrese3 le 30/06/2013 à 18:00
- Messages postés
- 15
- Date d'inscription
- vendredi 28 juin 2013
- Statut
- Membre
- Dernière intervention
- 21 octobre 2013
Modifié par Tyrese3 le 30/06/2013 à 18:00
Merci pour ton aide.
C'est nickel. C'est comme je voulais.
C'est nickel. C'est comme je voulais.