Bonjour,
"Delete", pour une cellule a un argument facultatif (Shift) qui permet de préciser dans quel sens, une fois la suppression effectuée, les cellules d'à coté doivent être déplacées, "xlShiftToLeft " déplace les cellules de droite vers la gauche et "xlShiftUp" déplace les cellules vers le haut et dans ton cas c'est cette dernière valeur que tu dois utiliser :
Sheets("PARAM").Cells(Ligne + 2, 5).Delete xlShiftUp '<-- !