macro pour suprimmer des ligne contenant des celulles vides

[tapha20]

Bjr à tous

je cherche à mettre en eouvre une macro pour supprimer des lignes contenant des celulles vides.

En effet le document est un fichier extrait d'une base de donnée de la boite, (relevé d'heures).

je voudrai le mettre sous une autre forme

Vous trouverz dans la pièce jointe le fichier en question avec HPR1 le fichier tel que je l'extrait. et ne HPR2 le fichier tel que je voudrais qu'il soit (après application de la macro.

MErci infinnement pour votre aide

Cordialement

 

[tapha20]

Re : macro pour suprimmer des ligne contenant des celulles vides

j'ai essyé cette macro elle a fonctionné à motié, il reste des lignes que j'ai colorié en jaune

 

[jpb388]

Re : macro pour suprimmer des ligne contenant des celulles vides

Bonjour à tous
tu peux essayer ça

Sub SupprimeBlanc()
Dim i As Long
Rows("1:4").Delete Shift:=xlUp
i = 2
Do
    If Range("a" & i).Value <> "E065" Then
        Rows(i).Delete Shift:=xlUp
        i = i - 1
    End If
i = i + 1
Loop Until Range("a" & i).Value = ""
End Sub

 

[tapha20]

Re : macro pour suprimmer des ligne contenant des celulles vides

Elle a magnifiquement fonctionné,

je te remercie beaucoup