Renommer les feuilles de calcul
fred
-
Raymond PENTIER Messages postés 71871 Date d'inscription Statut Contributeur Dernière intervention -
Raymond PENTIER Messages postés 71871 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?
A voir également:
- Renommer les feuilles de calcul
- Renommer des fichiers en masse - Guide
- Comment faire un livret avec des feuilles a4 - Guide
- Renommer son iphone - Guide
- Bruler les feuilles de laurier - Guide
- Calcul km marche à pied gratuit - Télécharger - Sport
3 réponses
bonjour
sans macro, je ne vois pas (ce qui ne veut pas dire ...)
avec macro
RQ. le symbole / n'est pas autorisé dans un nom de feuille
bonne suite
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
