Bonjour,
je suis débutant en vba et j'aimerai un peu d'aide.
Voila mon soucis est que j'ai une date dans la cellule A2 et voudrais afficher dans la colonne B tous les jours du mois correspondant a la date A2.
Merci pour votre aide!!
Version imprimable
Bonjour,
je suis débutant en vba et j'aimerai un peu d'aide.
Voila mon soucis est que j'ai une date dans la cellule A2 et voudrais afficher dans la colonne B tous les jours du mois correspondant a la date A2.
Merci pour votre aide!!
Bonjour,
Sans VBA
En B2En C2Code:=DATE(ANNEE(A2);MOIS(A2);1)
Tirer vers le bas la formule en C2 sur 31 lignesCode:=SI(B2<FIN.MOIS($A$2;0);B2+1;"")[/B]
Bonjour,
Essaie :
Code:
1
2
3
4
5
6
7 Sub test() Do i = i + 1 Cells(i, 2) = DateSerial(Year([A2]), Month([A2]), i) If Month(DateSerial(Year([A2]), Month([A2]), i) + 1) <> Month([A2]) Then Exit Do Loop End Sub
Bon dimanche!!!