Action sous condition de cellules vides

[Egruat]

Bonjour,
Dans un tableau Excel, sur un nombre de lignes définis (8 à 31), je dois vérifier si la cellule testée (B8) est vide,

- Si OUI, alors prendre la ligne 8 puis les deux lignes suivantes et cacher l'ensemble des 3 lignes

- Si NON, alors tester la cellule 3 lignes après

Ci-joint un tableau exemple.

Merci de votre aide.

Cordialement.😎

 

[phlaurent55]

Re : Action sous condition de cellules vides

Bonjour Egruat,

avec ce code:

Sub cacher()
For i = 8 To 29 Step 3
If Cells(i, 2).Value = "" Then
For j = i To i + 2
    Rows(j).EntireRow.Hidden = True
Next j
End If
Next i
End Sub

à+
Philippe