Creation d'un classeur avec des feuilles du mois en cours
a
Bonjour a tous,
j'ai besoin de crée un classeur avec de même feuilles mais la nomination se fait par date du mois en cours
Exemple: classeur " Chargement Juin 2022", les feuilles seront: feuille1 " 01/06/2022" feuille 2 "02/06/2022" ainsi de suite jusqu'à "30/06/2022"
je vous remercie d'avance
Salutations,
Invité
Bonjour ayoubmous,
Pas certain d'avoir compris, mais ce code créé les onglets des jours du mois
Sub AjoutOngletJour()
Dim DateDeb As Long, DateFin As Long, LeJour As Long
' Numéro de série de la date de départ
DateDeb = DateValue("01/" & Month(Date) & "/" & Year(Date))
' Numéro de série de la date de fin
DateFin = WorksheetFunction.EoMonth(DateDeb, 0)
' Numéro de série de la date du jour
LeJour = DateDeb
Do While LeJour <= DateFin
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Name = Format(LeJour, "dd.mm.yyyy")
LeJour = LeJour + 1
Loop
End SubA+
a
Rebonjour, BrunoM45
Je vous remercier bcp c'est tellement ce que je veux, c'est parfait,
mais il fait Just le mois courant, je peux pas crée au préalable le fichier du mois Aout par exemple,
aussi de copier le tableau de la feuille 1 dans tous les feuilles que nous avons cree avec les fonctions
ci-joint le fichier pour que tu me comprend bien,
meilleur salutations,
Je vous remercier bcp c'est tellement ce que je veux, c'est parfait,
mais il fait Just le mois courant, je peux pas crée au préalable le fichier du mois Aout par exemple,
aussi de copier le tableau de la feuille 1 dans tous les feuilles que nous avons cree avec les fonctions
ci-joint le fichier pour que tu me comprend bien,
meilleur salutations,
Invité
Re,
Navré, mais je ne refais jamais ce qui fonctionne
La prochaine fois pensez à joindre le fichier à votre demande comme indiqué dans la charte
1) vous avez l'enregistreur de macros qui peut vous aider à créer le code
2) vous aurez juste à l'adapter à ce que je vous ai donné