VBA Bloquer une ligne pour eviter de la suprimer

Bonjours a tous j'ai un problème je n'arrive pas a coder pour que ma ligne ou il y a ma cellule_depart ne ce surprime pas, elle me sert dans mon code pour commencer mon devis mais si je fais supprimer la planche et que je surprime cette ligne tous mon code bug, et du coup je ne peut plus l'utiliser .

J'aimerais donc que si l'utilisateur veut la supprimer un message d'erreur apparaisse et l’empêche donc de la supprimer voila en attende de votre aide.

merci d'avance

Private Sub cb_supprimer_Click()
Dim Cellule_depart As Integer
If MsgBox("Etes-vous certain de vouloir supprimer cette ligne ?", vbYesNo, "Demande de confirmation") = vbYes Then
    ActiveCell.EntireRow.Delete Shift:=xlUp
    If Range("cellule_depart").EntireRow.Value Then MsgBox ("Plus de planche à suprimer")
    USF.Hide
End If

Bonjour Jaja89

Peut-être un truc de ce style là

Private Sub cb_supprimer_Click()
  Dim Cellule_depart As Integer
  If ActiveCell.Row = Range("cellule_depart").Row Then
    MsgBox ("Plus de planche à suprimer")
  Else
    If MsgBox("Etes-vous certain de vouloir supprimer cette ligne ?", vbYesNo, "Demande de confirmation") = vbYes Then
      ActiveCell.EntireRow.Delete Shift:=xlUp
    End If
  End If
' USF.Hide  ' Masque l'USF
Unload Me  ' Ferme l'USF
End Sub

A+

bonjours Bruno génial merci beaucoup ça marche nickel grâce a toi j'ai enfin fini mon devis merci mille fois