la protection d'une feuille est une instruction refusée dans un partage.
solution possible: lors de la protection permettre la suppression d'une ligne, voir: AllowInsertingRows:=True
With Sheets("Feuil1")
'permet filtre et grouper lignes et colonnes
.EnableAutoFilter = True
.EnableOutlining = True
'pour les options de protection que vous ne désirer pas autoriser: changer True pour False
.Protect Password:="xxx", _
DrawingObjects:=True, _
Contents:=True, _
Scenarios:=True, _
AllowFormattingCells:=True, _
AllowFormattingColumns:=True, _
AllowFormattingRows:=True, _
AllowInsertingColumns:=True, _
AllowInsertingRows:=True, _
AllowInsertingHyperlinks:=True, _
AllowDeletingColumns:=True, _
AllowDeletingRows:=True, _
AllowSorting:=True, _
AllowFiltering:=True, _
AllowUsingPivotTables:=True, _
UserInterfaceOnly:=True
End With