Bonjour à tous,
Je reviens vers vous avec mon fichier de stockage d'échantillons que je cherche constamment à améliorer.
Cette fois-ci, l'idée est la suivante :
Physiquement :
Je conserve tous mes échantillons 1 an. A chaque fin de mois, je vide les armoires du mois suivant qui sont donc remplies avec les échantillons de l'année dernière. Par exemple, fin juin, je vais vider les armoires de juillet, qui contiennent les échantillons de juillet 2021, afin de pouvoir ranger les échantillons de juillet 2022.
Informatiquement :
J'aimerais qu'à l'ouverture de mon fichier, si nous sommes à la fin du mois, les lignes contenant les échantillons du mois suivant se suppriment.
La base de données ne contient pas de date, uniquement un numéro de mois dans la colonne E (1 pour janvier jusqu'à 12 pour décembre).
Comment je pensais m'y prendre :
- La colonne E contient donc le numéro de mois
- En J1, j'ai une formule qui me donne le numéro du mois en cours (actuellement, nous sommes en juin, donc 6)
- En J2, la formule me donne le premier jour du mois suivant (actuellement, 01-07-2022)
- En J3, j'ai le nombre de jours restants jusqu'au 1er jour du mois suivant (aujourd'hui, 19)
De manière rédigée, le code serait : si J3 < ou = à 15, alors : si colonne E contient valeur égale à J1+1, alors supprimer les lignes concernées. Sinon rien.
Mais comment dit-on ça en VBA ??? Est-ce que vous auriez des idées ? Est-ce que ma manière de procéder est bonne ?
Dans l'attente de vos retours,
Dem8
Je reviens vers vous avec mon fichier de stockage d'échantillons que je cherche constamment à améliorer.
Cette fois-ci, l'idée est la suivante :
Physiquement :
Je conserve tous mes échantillons 1 an. A chaque fin de mois, je vide les armoires du mois suivant qui sont donc remplies avec les échantillons de l'année dernière. Par exemple, fin juin, je vais vider les armoires de juillet, qui contiennent les échantillons de juillet 2021, afin de pouvoir ranger les échantillons de juillet 2022.
Informatiquement :
J'aimerais qu'à l'ouverture de mon fichier, si nous sommes à la fin du mois, les lignes contenant les échantillons du mois suivant se suppriment.
La base de données ne contient pas de date, uniquement un numéro de mois dans la colonne E (1 pour janvier jusqu'à 12 pour décembre).
Comment je pensais m'y prendre :
- La colonne E contient donc le numéro de mois
- En J1, j'ai une formule qui me donne le numéro du mois en cours (actuellement, nous sommes en juin, donc 6)
- En J2, la formule me donne le premier jour du mois suivant (actuellement, 01-07-2022)
- En J3, j'ai le nombre de jours restants jusqu'au 1er jour du mois suivant (aujourd'hui, 19)
De manière rédigée, le code serait : si J3 < ou = à 15, alors : si colonne E contient valeur égale à J1+1, alors supprimer les lignes concernées. Sinon rien.
Mais comment dit-on ça en VBA ??? Est-ce que vous auriez des idées ? Est-ce que ma manière de procéder est bonne ?
Dans l'attente de vos retours,
Dem8