bonsoir Ldopa
tu as une flopée de modules qui ne sert qu'a une chose chacun autant les réunir en 6 dédiées chacun soit aux usf, aux sub, aux zoom, aux efface, aux enregistrements, aux impressions
et puis ensuite on vois mieux qu'il y a du boulot, ne serait qu'enlever toutes les .select et activesheet tout comme l'exemple qui vas te permettre de t'y coller
au niveau des userform les codes sont corrects
Sub Effacer_Inscriptions_FFC()
' Effacer_Inscriptions_FFC()
Range("E2:Y3,E5:Y19,E20:Y20").ClearContents
'Range("E3:Y3").ClearContents
'Range("E5:Y19").ClearContents
'Range("E20:Y20").ClearContents
' Range("A2:D2").Select
End Sub
car je te laisse entre bonne mains avec MFerrand ou un autre, je vais m'absenter jusque le 7 ou le 8 suivant
mais je suivrait le post sans pouvoir y répondre, mais tout je ne peut le faire moi-même
je joints ton fichier la ou j'en suis car il faut que voir si mon lit m('attends