Effacement de cellules contenant un calendrier de dates

[thomasdu43]

Bonjour,

Ci-joint un fichier pour lequel j'ai créer un bouton d'effacement automatique des cellules saisies. Vous vous apercevrez qu'en l'actionnant, à chaque cellule contenant le calendrier (B45, B85 et B120), l'effacement se bloque. Peut on éviter cette anomalie et permettre un effacement d'un seul jet.

Merci de votre aide.

cdt.

 

[Paf]

Re : Effacement de cellules contenant un calendrier de dates

Bonjour

l'effacement déclenche la macro évènementielle.

Pour l'éviter, rajouter en début de macro:

Application.EnableEvents = False

et en fin de macro:

Application.EnableEvents = True

Par ailleurs il faudra certainement redéfinir les plages à effacer qui contiennent des cellules fusionnées.

A+

 

[thomasdu43]

Re : Effacement de cellules contenant un calendrier de dates

super, ça fonctionne, merci.