Microsoft 365 création de boucle et suppression de ligne si une cellule est vide

[JVOS]

Bonjour à tous
Je dois transformer chaque ligne d'un tableau en TTC HT TVA (si elle existe)
Pour cela j'ai créée une macro (elle est pas super évidement mais elle fait le job).
Cependant il arrive que j'ai pas de TVA et je voudrais que la ligne soit supprimé
De plus je ne sais pas faire de boucle, car le nombre de lignes est variable à chaque traitement de données.
Je vous au mis un fichier avec des données et une feuille qui donne un exemple du rendu voulu.
Merci beaucoup du temps que vous consacrerez à mon problème

 

[sylvanu]

Bonsoir Jvos,
Sans toucher à votre macro, à la fin de celle ci avant le End Sub ajoutez cette ligne : Call SupLigne
Et ajoutez cette macro, en modifiant le nom de la page concernée :

Sub SupLigne()
Dim L%: Application.ScreenUpdating = False
With Sheets("exemple de la finalité")    ' A adapter
    For L = .[A10000].End(xlUp).Row To 2 Step -1
        If .Cells(L, "C") = "" Then .Rows(L).Delete Shift:=xlUp
    Next L
End With
End Sub

 

[JVOS]

Bonsoir Jvos,
Sans toucher à votre macro, à la fin de celle ci avant le End Sub ajoutez cette ligne : Call SupLigne
Et ajoutez cette macro, en modifiant le nom de la page concernée :

Sub SupLigne()
Dim L%: Application.ScreenUpdating = False
With Sheets("exemple de la finalité")    ' A adapter
    For L = .[A10000].End(xlUp).Row To 2 Step -1
        If .Cells(L, "C") = "" Then .Rows(L).Delete Shift:=xlUp
    Next L
End With
End Sub

Bonjour
Merci beaucoup pour ton aide
Impeccable la suppression de ligne