Sub supprimerligne()
'
' supprimerligne Macro
'
'
Sheets("TicketsRest").Select
ActiveSheet.Unprotect
Sheets("Synthèse").Select
ActiveSheet.Unprotect
Sheets("matrice").Select
ActiveSheet.Unprotect
Sheets(Array("matrice", "Synthèse", "TicketsRest")).Select
Sheets("matrice").Activate
Rows("14:14").Select
Selection.Delete Shift:=xlUp
Sheets("TicketsRest").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Rows("14:14").Select
ActiveSheet.Unprotect
Range("A1:R3").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Sheets("TicketsRest").Select
ActiveWindow.LargeScroll Down:=0
Sheets("Synthèse").Select
Range("A3").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Sheets("matrice").Select
Range("A10").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub