Renommer les feuilles de calcul
fred
-
Raymond PENTIER Messages postés 58213 Date d'inscription Statut Contributeur Dernière intervention -
Raymond PENTIER Messages postés 58213 Date d'inscription Statut Contributeur Dernière intervention -
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?
3 réponses
-
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 -
Qui dit "automatiquement" dit VBA et macro ...
-
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
