Masquer une ligne si une Colonne est vide

Bonjour, Je voulais savoir s'il était possible de masquer automatiquement une ligne si une cellule est vide ? Par exemple Si la Cellule F11 Est Vide, Masquer la ligne F ?

Merci d'avance pour vos réponses

Bonsoir,

Bé... Non ! Il n'y a pas de ligne F.

Bonjour,

Hello MFerrand !

Pas de ligne F pas plus que de colonne 11 !

Une piste que tu pourras adapter :

Range("F11").EntireRow.Hidden = Range("F11").Value = ""

J'adore la définition de propriété par une expression booléenne, c'est toujours très subtil, avec un parfum de mystère... très classe !

Bonjour,

excusez moi, l'objectif est lorsque une cellule en collone F est vide, la ligne de cette cellule est masquée. Par exemple, lorsque F11 est vide, la ligne 11 est masquée ?

Merci d'avance pour vos réponses,

Bonjour,

Sub Test()
    Dim n%
    With ActiveSheet
        n = .Range("A" & .Rows.Count).End(xlUp).Row
        On Error Resume Next
        .Range("F1:F" & n).SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
    End With
End Sub

Bonjour, Le code ne fonctionnait pas, J'en ai trouvé un autre qui fonctionne cependant maintenant, je le compléter pour que les cellules non vides de la colonne F (F11:F650) aient une hauteur de 20 ?

Merci beaucoup,

Bon premier Mai !

Sub Worksheet_Activate()
Dim cel As Range
For Each cel In Range("F11:F650")
If cel = "" Then
cel.EntireRow.Hidden = True
End If
Next
For Each cel In Range("F11:F650")
If Cel = <> "" Then
cel.EntireRow.Hidden = False
End If
Next
End Sub

Bonsoir christ04,

A essayer:

Sub Worksheet_Activate()
    Application.ScreenUpdating = False  'évite le scintillement de l'écran
    Dim cel As Range
    For Each cel In Range("F11:F650")
    If cel = "" Then
    cel.EntireRow.Hidden = True
    End If
    Next
    For Each cel In Range("F11:F650")
    If cel <> "" Then
    cel.EntireRow.Hidden = False
    cel.EntireRow.RowHeight = 20 'redimensionne les lignes non masquées de F11 à F650
    End If
    Next
    Application.ScreenUpdating = True
    End Sub

Bonne soirée,

Bonjour,

Cela fonctionne parfaitement !

Merci beaucoup,

Bonne soirée à vous !