XL 2019 Faire disparaitre une case si vide

[afages]

Bonjour,

Nous avons un fichier excel avec deux feuilles.
Sur la première des cases à cocher, sur la seconde lorsque les cases sont cochées un affichage de phrases.

Nous aimerions trouver une solution afin que les cases vides (car la case sur la feuille 1 n'ont pas été coché) puisse disparaitre à l'affichage.
En effet, suivant les réponses, cela fait des gros blocs de cases vides.

En espérant avoir été claire, merci par avance pour votre aide.

Adeline

 

[djidji59430]

En espérant avoir été claire, merci par avance pour votre aide.
Adeline

Bonjour,
Un fichier (test ou non), complété par des explications exhaustives et des exemples remplis à la main, mis sur le forum permettrait aux intervenants de répondre plus précisément à ta question.

Crdmt

 

[afages]

Merci pour votre retour.
Je vous ajoute cela en PJ ici :

Dans la feuille "ordre d'opération" c'est les items qui apparaissent si dans la feuille SOURCES c'est "VRAI".
Par exemple pour les 3 premiers "utilisation ERP existants, utilisations de structures temporaires et risques de feu sur des structures temporaires", s'ils sont tous les 3 FAUX dans la feuille SOURCES, cela fait un gros "trou" vide. Nous aimerions pouvoir demande à Excel que les lignes 37, 38 et 39 soient "cachés" si A37, A38 et A39 sont vides. Ainsi, cela réduirait l'espace.

Merci encore.

 

[job75]

Bonjour afages, djidji59430, le forum,

Voyez le fichier .xlsm joint et cette macro dans le code de la feuille "Ordre opération" (clic droit sur l'onglet et Visualiser le code) :

Private Sub Worksheet_Calculate()
Dim c As Range
Application.EnableEvents = False 'désactive les évènements
For Each c In UsedRange.Columns(1).Cells
    If TypeName(c.Value) = "Boolean" Then c.EntireRow.Hidden = Not c
Next
Application.EnableEvents = True 'réactive les évènements
End Sub

La macro se déclenche automatiquement quand une formule de la feuille est recalculée.

Cliquez sur une case à cocher dans la 1ère feuille.

Edit : j'ai inversé l'ordre des feuilles.

A+

 

[job75]

Il y a plus simple, plus besoin de formules, affectez aux cases à cocher cette macro :

Sub Affiche_Masque()
With Range(ActiveSheet.Shapes(Application.Caller).ControlFormat.LinkedCell) 'cellule liée
    Sheets("Ordre opération").Rows(.Row).Hidden = Not .Value
End With
End Sub

Les cellules liées dans la 1ère feuille doivent correspondre aux lignes à masquer dans la 2ème.

Fichier (2).

 

[afages]

Merci pour votre aide !