Comment incrémenter une date avec une macro

Fermé
zaboufredo - 28 janv. 2015 à 19:15
Patty5083 Messages postés 34 Date d'inscription lundi 14 avril 2014 Statut Membre Dernière intervention 10 novembre 2019 - 28 janv. 2015 à 21:49
Bonjour,
j'ai un tableau sous excel avec des données à rentrer tous les jours(une machine qui produit des pièces et aussi des rebuts;ça arrive)
j'ai crée une macro qui lorsque le mois est terminé me crée un nouveau classeur avec mon tableau terminé archivé et me remet également à zéro mon tableau initial prêt à recevoir les nouvelles données.
mais je voudrais aussi que sur mon tableau "vidé" le mois soit incrémenté +1
en plus je reprend le mois en a1 comme valeur pour remplir ma colonne date.
je ne sais pas comment passer de 01/01/2015 à 01/02/2015.
merci pour vos infos.
A voir également:

1 réponse

Patty5083 Messages postés 34 Date d'inscription lundi 14 avril 2014 Statut Membre Dernière intervention 10 novembre 2019
28 janv. 2015 à 21:49
Bonsoir
Ce code marche. A toi de l'adapter pour ton cas ou de trouver mieux:

Sub Ajout_mois()
'Mettre le 1er du mois suivant dans les cellules B12,B13,B14 à partir des dates des cellules B2,B3,B4

Range("B12") = Year(Range("B2")) & "/" & Month(Range("B2")) + 1 & "/" & 1
Range("B13") = Year(Range("B3")) & "/" & Month(Range("B3")) + 1 & "/" & 1
Range("B14") = Year(Range("B4")) & "/" & Month(Range("B4")) + 1 & "/" & 1

End Sub


Bon courage
0