Cacher ou montrer ligne si case sans texte et non noire

Bonjour vous tous,

je me sert de votre forum afin d'éditer un fichier, mais la je bloque.

La demande est la suivante, selon les infos de la page 1, la page 2 se remplit.

Selon les infos de la page 2 certaines lignes sont encadrer et d'autres coloriées en noir.

Jusque la tout vas bien.

Il ne reste qu'a masquer les lignes de la page 2 qui ne contiennent pas de texte en D (bien qu'elles contiennent des formules ) tout en sachant qu'elles doivent réaparaitre si la feuille 1 est modifiée.

Donc si quelqu'un se sent d'attaque, je lui en serait très reconaissant.

Bien à vous et bonne journée.

Eric

Bonjour,

Un truc affolant dans ton fichier.... pourquoi réduire une ligne tout cela pour tracer une bordure

Evite les lignes vides et si tu veux une bordure plus épaisse, utilise l'outil approprié.

Si ok, je corrige ton fichier avant de te proposer quelque chose.

A te relire

Bonjour,

Vu que tu met deux pages en parallèle c'est pas possible de cacher uniquement les lignes par pages.

A+

EDIT : Bonjour DAN

Bonjour Dan,

la MEFC ne me permettait pas de mettre une bordure plus grosse, en effet cette feuille est censée être découpée.

Mais je suis ouvert a toute proposition.

Bonjour lermite,

Je met deux pages en parallèle mais la page 1 doit garder son layout d'origine.

Merci de vos réponses et du temps que vous m'accordez.

Eric

Ont ne s'est pas bien compris (ou j'ai mal expliquer)

Je parle de deux pages SUR LA MÊME FEUILLE

C'est moi qui ai mal du comprendre, toutefois la raison du layout de la page 1 reste effective.

Si je met les 2 tableaux sur la même feuille cela réduirait de tableau premier, or il faut que ce tableau reste fixe.

La j'ai peur que ce sois moi qui m'exprime mal...............

Il ne reste qu'a masquer les lignes de la page 2 qui ne contiennent pas de texte en D

Et sur cette feuille tu a deux pages en parallèle ?

re

la MEFC ne me permettait pas de mettre une bordure plus grosse, en effet cette feuille est censée être découpée.

Mais je suis ouvert a toute proposition.

Lol ! j'avais pu cette MFC mais encore moins cette manière de faire

Essaie ceci :

Sub test()
Application.ScreenUpdating = False
For Each cel In Range("D3:D" & Range("D" & Rows.Count).End(xlUp).Row)
If cel = " " Or IsEmpty(cel) Then
    cel.EntireRow.Hidden = True
Else: cel.EntireRow.Hidden = False
End If
Next
Application.ScreenUpdating = True
End Sub

Code à placer dans un module en VBE et à associer à un bouton par exemple

Mais cela cachera aussi les ligne avec MFC puisque vide d'info...

Amicalement

Coucou,

Le code semble très bien fonctionner, j'ai retiré les MFC et je suis entrain de corriger les fonctions que j'ai mal écrites,( c'est grace au vb que je m'en suis rendu compte).

Toujours en est-il que merci 1000 fois.

Deux questrions subsistent néanmoins ;

la première, peux-tu me décoder en language courant les termes de la VBA ?

La seconde, peux-t'on penser une macro d'anulation ?

eric

re

la première, peux-tu me décoder en language courant les termes de la VBA ?

Explication des lignes du code :

Sub test()
'suspension du rafraichissement de l'écran
Application.ScreenUpdating = False
'boucle sur chaque cellule dans la plage entre D3 et la dernière cellule remplie de la colonne D
For Each cel In Range("D3:D" & Range("D" & Rows.Count).End(xlUp).Row)
'on vérifie si la cellule est vide de données - le  " " correspond à ce qui est dans ta formule
If cel = " " Or IsEmpty(cel) Then
' condition Oui : on cache la ligne
cel.EntireRow.Hidden = True
'Condition Non : on affiche la ligne
Else: cel.EntireRow.Hidden = False
End If
'on passe à la cellule suivante
Next
' on remet le rafraichissement de l'écran
Application.ScreenUpdating = True
End Sub

La seconde, peux-t'on penser une macro d'anulation ?

Explique ce que tu veux entends exactement par annulation

Amicalement

Coucou Dan,

Dan a écrit :

Explique ce que tu veux entends exactement par annulation

Enfait c'est inutile mais j'ai posé la question avant même d'y avoir réfléchi ...........

Merci pour toutes les explications, va sörieusement falloir que je me mettre à la prog.

Très bonne journée et à très vite lol, le fichier est loin d'être fini ....

Eric