Bonjour à tous,
Je sollicite votre aide aujourd'hui pour la modification d'une macro. A ce jour elle marche très bien mais je viens de m'apercevoir ce matin qu'il y avait quand même un petit souci. Je m'explique :
Cette macro sert à effacer les cellules vertes et les cellules contenant des "P" (cellules K à AO) en fonction de la date de sortie entrée en cellule H.
Ce code fonctionne très bien mais je viens de m'apercevoir qu'il m'effaçait également les formules des cellules AP à BJ, et bien sur j'en ai besoin !
Sauriez vous comment faire pour que le code ci-dessus ne s'occupe que des cellules du mois (K à AO, mais AO est variable est fonction du mois et du nombre de jour dans ce mois, par exemple le mois de Juin ce sera K à AN)
Protéger la feuille n'est pas une solution, en effet, le code associé au bouton "rafraîchir "mois suivant"" a besoin que le classeur ne soit pas protégé.
Merci à tous
Je sollicite votre aide aujourd'hui pour la modification d'une macro. A ce jour elle marche très bien mais je viens de m'apercevoir ce matin qu'il y avait quand même un petit souci. Je m'explique :
Cette macro sert à effacer les cellules vertes et les cellules contenant des "P" (cellules K à AO) en fonction de la date de sortie entrée en cellule H.
Code:
rg = ActiveSheet.Index
For Each c In Sheets(rg).Range("H4;H423")
If IsDate(c) Then
c.Offset(0, 3 + Day(c)).Resize(1, 31).ClearContents
c.Offset(0, 2 + Day(c)).Value = 350
c.Offset(1, 2 + Day(c)).Resize(1, 31).ClearContents
End If
Next cCe code fonctionne très bien mais je viens de m'apercevoir qu'il m'effaçait également les formules des cellules AP à BJ, et bien sur j'en ai besoin !
Sauriez vous comment faire pour que le code ci-dessus ne s'occupe que des cellules du mois (K à AO, mais AO est variable est fonction du mois et du nombre de jour dans ce mois, par exemple le mois de Juin ce sera K à AN)
Protéger la feuille n'est pas une solution, en effet, le code associé au bouton "rafraîchir "mois suivant"" a besoin que le classeur ne soit pas protégé.
Merci à tous