Vba excel dates
flyersgoaler
Messages postés
35
Statut
Membre
-
lermite222 Messages postés 9042 Statut Contributeur -
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour,
Je suis présentement dans une impasse. Pour l'instant, j'ai codé du vba afin que 12 feuilles apparaissent, représentant les mois de l'année. Par la suite, il m'est demandé de mettre les dates de chaque mois sur chaque feuille, mais je ne sais pas comment arriver.(ex pour octobre, on devrait pouvoir lire les dates de 2008-10-01 jusqu'à 2008-10-31) J'ai regardé sur Internet, mais en vain. Voici le code avec lequel j'ai affiché 12 feuilles pour les mois.
Dim i As Integer
For i = 1 To 12
ActiveWorkbook.Sheets.Add after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = Format(30 * i, "mmmm")
Next i
End sub
Je suis présentement dans une impasse. Pour l'instant, j'ai codé du vba afin que 12 feuilles apparaissent, représentant les mois de l'année. Par la suite, il m'est demandé de mettre les dates de chaque mois sur chaque feuille, mais je ne sais pas comment arriver.(ex pour octobre, on devrait pouvoir lire les dates de 2008-10-01 jusqu'à 2008-10-31) J'ai regardé sur Internet, mais en vain. Voici le code avec lequel j'ai affiché 12 feuilles pour les mois.
Dim i As Integer
For i = 1 To 12
ActiveWorkbook.Sheets.Add after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = Format(30 * i, "mmmm")
Next i
End sub
A voir également:
- Vba excel dates
- Nombre de jours entre deux dates excel - Guide
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
4 réponses
Bonjour
essaye cela
essaye cela
dim d1 as date, i as integer, j as integer, annes as integer
annee = 2008 ' jai mis comme cela pour les mois de février à 29 jour
For i = 1 To 12
ActiveWorkbook.Sheets.Add after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = Format(30 * i, "mmmm")
d1 = datevalue("01/" & format(i,"00") & "/" & annee)
d1 = d1 - 1
for j = 1 to 31
d1 = d1 + 1
if month(d1) = i then range("A" & i)=format(d1,"dd/mm/yyyy")
next j
Next i
Merci pour ton aide,mais malheureusement, le code ne fait que me donner une date... Je vais essayer de trouver ce que je pourrais changer à ton code pour que cela marche...
merci encore
merci encore
re:
je ne comprends pas, tu demandes les dates d'un mois, je te les donne..... et tu dis que ça ne marche pas ???
alors soit ta question n'est pas comprise, soit elle est incomplète..... faut il rapprocher cette question avec ce fil ???
http://www.commentcamarche.net/forum/affich 9396457 vba heures?#3
pour lequel lermite222 t'a apporté une réponse 9:00 avant ton Post et attend toujours une réponse de ta part...
si c'est le cas, tu n'aurais pas du quitter le précédent fil et exposer plus précisément ton besoin..
@ te lire
je ne comprends pas, tu demandes les dates d'un mois, je te les donne..... et tu dis que ça ne marche pas ???
alors soit ta question n'est pas comprise, soit elle est incomplète..... faut il rapprocher cette question avec ce fil ???
http://www.commentcamarche.net/forum/affich 9396457 vba heures?#3
pour lequel lermite222 t'a apporté une réponse 9:00 avant ton Post et attend toujours une réponse de ta part...
si c'est le cas, tu n'aurais pas du quitter le précédent fil et exposer plus précisément ton besoin..
@ te lire
