sebh74
Nouveau membre
Nouveau en VBA, je cherche à faire un fichier me permettant de recopier mes données (centralisées en feuil 1) vers les feuilles 2,3 et 4 en fonction d'un menu déroulant (fait en 1 avec lien hypertexte conditionnel).
Quand j'arrive sur ma feuille 3 et 4, je cherche à effacer les lignes vides.
Celà fonctionne avec un petit bout de code comme ça:
Sub EntireRow()
For i = Range("A" & Rows.Count).End(xlUp).Row To 1 Step -1
If Cells(i, 1) = "" Then
Cells(i, 1).EntireRow.Delete
End If
Next i
End Sub
mais cette feuille ne se met plsu à jour si je dois re rentrer des données sur la feuil1....
je coince, merci de votre aide
Quand j'arrive sur ma feuille 3 et 4, je cherche à effacer les lignes vides.
Celà fonctionne avec un petit bout de code comme ça:
Sub EntireRow()
For i = Range("A" & Rows.Count).End(xlUp).Row To 1 Step -1
If Cells(i, 1) = "" Then
Cells(i, 1).EntireRow.Delete
End If
Next i
End Sub
mais cette feuille ne se met plsu à jour si je dois re rentrer des données sur la feuil1....
je coince, merci de votre aide