Renommer les feuilles de calcul

Fermé
fred - 28 mars 2012 à 20:49
Raymond PENTIER Messages postés 58414 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 8 mai 2024 - 29 mars 2012 à 00:51
Bonjour, j'ai créé un fichier excel et je souhaiterais que les feuilles de calcul soient automatiquement renommer par date (ex : feuille 1=dimanche 1/04, feuiile 2 =lundi 2/04, etc...).Comment faire?



A voir également:

3 réponses

ccm81 Messages postés 10855 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 29 avril 2024 2 404
Modifié par ccm81 le 28/03/2012 à 22:12
bonjour

sans macro, je ne vois pas (ce qui ne veut pas dire ...)
avec macro

Const ds = "01/04/2012" 

Public Sub NommeFeuille() 
Dim tj 
Dim nbf As Long, nuf As Long 
Dim dd As Date 
Dim nomf As String 
dd = DateValue(ds) 
tj = Array("dimanche", "lundi", "mardi", "mercredi", "jeudi", "vendredi", "samedi") 
nbf = Sheets.Count 
For nuf = 1 To nbf 
  nomf = tj(Day(dd)) & " " & Day(dd) & " - " & Month(dd) 
  Sheets(nuf).Name = nomf 
  dd = dd + 1 
Next nuf 
End Sub

RQ. le symbole / n'est pas autorisé dans un nom de feuille

bonne suite
0
Raymond PENTIER Messages postés 58414 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 8 mai 2024 17 104
29 mars 2012 à 00:51
Qui dit "automatiquement" dit VBA et macro ...
0
Bibidu67 Messages postés 115 Date d'inscription mercredi 28 mars 2012 Statut Membre Dernière intervention 4 octobre 2012 23
28 mars 2012 à 21:11
Bonsoir,
clic-droit sur l'onglet feuille que vous voulez renommer (en bas à gauche)
puis dans le menu déroulant cliquez sur renommer.
(j'utilise Excel 2010)
j'espère vous avoir aidé,
Bibi
-2
Raymond PENTIER Messages postés 58414 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 8 mai 2024 17 104
29 mars 2012 à 00:51
"je souhaiterais que les feuilles de calcul soient automatiquement renommer par date"
0