Dans l’exemple suivant, toutes les lignes vides sont masquées. Une ligne est considérée comme vide si et seulement s’il n’y a pas d’entrée dans la colonne A de la ligne concernée. La macro de cette édition est:
Sub MasquerLesLignesVides() Dim i As Long Sheets("Feuil2").Activate For i = 1 To ActiveSheet.UsedRange.Rows.Count Range("A" & i).Select If ActiveCell.Value = "" Then ActiveCell.EntireRow.Hidden = True Else End If Next i End Sub
Utilisez l’instruction ActiveSheet.UsedRange.Rows.Count pour déterminer le nombre de lignes remplies de la tâche. Ce nombre déterminé constitue la condition de fin de la boucle suivante. Maintenant, parcourez toutes les lignes utilisées de Spaite A et vérifiez si elles sont vides. Si tel est le cas, vous pouvez utiliser l’instruction ActiveCell .EntireRow.Hidden = T rue pour quitter ces lignes.