> Tous les forums > Forum Bureautique
 Excel-Comment nommer les onglets des feuilles?
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
vmakuba
  Posté le 21/10/2005 @ 14:20 
Aller en bas de la page 
Petit astucien
Salut, J'ai un classeur qui gère plusieurs feuilles chacune concerne un mois. La première feuille concerne les saisies, et les données sont sélectiionnées par date et renvoyées sur chaque mois. Comment faire pour que, lorsque je saisie une date (ex 21/10/2005)sur la feuille des saisies, que l'onglet de la feuille des données d'octobre s'adapte à ce mois, en ne tenant compte que du mois? Merci de votre réponse.
Publicité
sourisdeservice
 Posté le 21/10/2005 à 18:59 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grande Maîtresse astucienne

Salut, Si je répond à la question du titre c'est simple Clic droit sur l'onglet et sur renommer - taper directement le nom pour la suite c'est sans doute de la programmation en VBA qui pourra le faire ou alors envisager d'apprendre Access et tu feras ce que tu veux avec un certain apprentissage [langue]
galopin01
 Posté le 21/10/2005 à 20:34 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien
oui, c'est un peu nébuleux.
monkiki
 Posté le 21/10/2005 à 21:21 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne
Salut, Voici l’instruction VBA pour renommer l’onglet de la feuille 3 par ex. Sheets("Feuil3").Name = "Octobre" Il suffit de faire une macro événementielle dans le module de chacune de tes feuilles qui lance une fonction qui elle renomme l’onglet souhaité. Je ne vois pas comment on pourrait te faire une macro avec toutes les suppositions et les imprécisions. Si tu n’arrive pas à définir plus précisément ton besoin, la solution de sourisdeservice est tout à fait adaptée.
vmakuba
 Posté le 21/10/2005 à 22:24 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
Salut à tous et merci de votre contribution. Le problème est que je gère un fichier dynamique, dont les noms des onglets des feuilles dépendent des mois saisis. Ceci signifie que si je tape une date 21/10/2005 dans la cellule A1 de la feuil1, que le nom de l'onglet de feuil1 soit changé en "Octobre 05". Si dans A1 je saisis la date du 14/12/05, que l'onglet de la feuille porte le nom de "Décembre 05". C'est donc un fichier dynamique. La solution de Monkiki s'approche un peu, mais là le nom de l'onglet est défini dans le code et est statique. Je vous remercie encore de votre contribution. A+
Marmotte18
 Posté le 22/10/2005 à 06:59 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour, Supposons que la date qui permet de changer automatiquement le nom de l'onglet soit en A1. Exemple : A1=12/09/2005 Insère la macro suivante dans l'objet qui porte le nom de ta feuille : Private Sub Worksheet_Change(ByVal Target As Range) Dim Mois As Byte Mois = Month(Range("A1").Value) ActiveSheet.Select ActiveSheet.Name = Choose(Mois, "Janvier", "Février", "Mars", "Avril", "Mai", "Juin", "Juillet", "Août", "Septembre", "Octobre", "Novembre", "Décembre") End Sub => A chaque fois que tu changeras de date dans A1, le nom de ton onglet sera modifié automatiquement avec le nom du mois correspondant Marmotte18 [IMG]http://img97.exs.cx/img97/7449/Mimoza.jpg[/IMG] Dites le avec des fleurs, c'est tellement plus gentil ...
vmakuba
 Posté le 22/10/2005 à 22:17 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
Merci Marmotte18, merci à tous, J'ai essayé ton code et ça marche. J'ai mm ajouté qu'il affiche l'année à coté du mois. Il me reste à trouver le bon événement pourque les noms des onglets de toutes les feuilles concernées par la macro changent une fois que la date est saisie sur la feuille des saisies (en incrémentant les mois sur chaque feuille et en s'adaptant à cette date). Je vous recontacte si je n'y arrive pas. Mais ce que j'ai obtenu c'est déjà bcp mieux, une fois de plus merci à tous. A Bientôt.
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
789,99 €PC Portable 16.1' HP Victus (FHD, R7 5800H, 16Go/512Go, RX5500 4Go) à 789,99€ (code REM100 + ODR)
Valable jusqu'au 26 Octobre

Fnac fait une réduction sur le PC Portable 16.1' HP Victus 16-e0153nf qui passe à 1039,99 € au lieu de 1300 €. Or vous pouvez baisser encore le prix de 100 € avec le code promo REM100 puis bénéficier d'une offre de remboursement par HP de 150 €. Au final, ce portable très bien équipé vous reviendra à 789,99 €. Il comporte un écran IPS Full HD de 16.1 pouces, un processeur AMD Ryzen 7 5800H, 16 Go de RAM, un SSD de 512 Go, une carte graphique dédiée RX5500 4 Go, un clavier rétro éclairé, une batterie charge (autonomie 10h). Le tout tourne sous Windows 10 que vous pourrez passer à Windows 11. Une superbe affaire !


> Voir l'offre
-25%Lipton, Pukka, Elephant : jusqu'à -25% sur une sélection de coffrets et calendriers de l'avent Thé
Valable jusqu'au 25 Octobre

Amazon offre actuellement jusqu'à 25% de réduction  sur une sélection de coffrets et calendriers de l'avent Thé et Infusion Lipton, Pukka et Elephant. De quoi se faire plaisir en attendant Noël.


> Voir l'offre
1349,99 €PC portable 15,6 pouces HP Omen (R7 5800H, 16Go/SSD 512Go, GeForce RTX 3070) à 1349,99 € (via ODR)
Valable jusqu'au 25 Octobre

Cdiscount fait une belle promotion sur le PC portable HP Omen 15-en1006nf qui passe à 1499,99 €. Or HP rembourse actuellement 150 € pour l'achat de cet ordinateur qui vous reviendra à 1349,99 € après remboursement. On le trouve ailleus à plus de 2000 €.

e portable dispose d'un écran 15,6 pouces Full HD IPS (1920 x 1080 pixels) à 144 Hz, d'un processeur AMD Ryzen 7 5800H à 8 coeurs, de 16 Go de RAM, d'un SSD NVMe de 512 Go. Il intègre également une carte graphique dédiée GeForce RTX 3070 8 Go.

Il possède 4 ports USB 3.2, un port USB 3.2 Type C, un lecteur de carte mémoire, une webcam, le WiFi 6, bluetooth 5.0 et un port Ethernet Gigabit. Il tourne sous Windows 10. Un ordinateur très performant, parfait pour un usage bureautique, multimédia et gaming.


> Voir l'offre

Sujets relatifs
Comment Renommer les onglets Feuil dans Excel
Comment supprimer recherche Laoscript au démarrage Excel ?
excel: effacer le contenu ds plusieurs feuilles
Comment afficher la dernière information d'une colonne Excel
copier sur plusieurs feuilles excel en meme temps
Comment insérer un tableau Excel de calcul dans un site?
comment inscrire la date dans excel
comment suivre mon compte en banque sur excel
Comment recuperer des fichiers Excel 2007 avec Excel 2003
Comment verrouiller une cellule Excel 2007
Plus de sujets relatifs à Excel-Comment nommer les onglets des feuilles?
 > Tous les forums > Forum Bureautique