salut
je vous remerci pour ce magnefique travaille
mé le pb cé ke je peut pas executer le programme cause des débougages
toute fois que je l'ouvre il m'envoie une msg de debougage je le site dans le suite
svp aider moi cé tres urgent.
mes grand salutation
Private Sub Workbook_Open()
ThisWorkbook.Worksheets(1).Activate
Range("c65536").End(xlUp).Offset(1, 0).Activate
'For Each Worksheet In Sheets
'Worksheet.Protect Password:="tp", UserInterfaceOnly:=True
'Next Worksheet
usfAffichage.Show