listes déroulantes des lignes non masquées

[Ilino]

Forum Bonsoir
Mon souci de jour est le suivant
Je souhaiterai afficher une liste déroulante selon les lignes affichées
Dans la feuille 1 j’ai 4 tableaux (A30 –A228 et A234-A432,A438-A636 A642-A1042) je souhaiterai dans la feuille 2 afficher des listes déroulantes des lignes non masquées seulement des tableaux de la feuille 1
Exemple si toutes les tableaux sans masqué sauf le 1 et 2 eme tableau et que les lignes A1 A2 A3 et B1& B2 B3 B4 B5 B6
Je dois avoir une liste déroulante (A1 A2 A3 et B1 & B2 B3 B4 B5 B6)dans chaque cellules de la ligne Z9-AI 9
grazie

 

[Ilino]

Re : listes déroulantes des lignes non masquées

forum bonjour
est ce que mon souci est claire ???
A+

 

[DoubleZero]

Re : listes déroulantes des lignes non masquées

Bonjour, Ilino, le Forum,

Une suggestion en pièce jointe.

A bientôt 🙂

P. S. : Bonjour, job75 😀

 

[job75]

Re : listes déroulantes des lignes non masquées

Bonjour Ilino, [Edit] bonjour chère ânesse,

Il faut construire la liste dans une colonne auxiliaire, par exemple C, que tu masqueras.

Vois le fichier joint avec cette formule matricielle en Feuil1!C1 :

=INDEX(A:A;PETITE.VALEUR(SI(SOUS.TOTAL(103;DECALER(A$1;LIGNE(A$29:A$1041);));LIGNE(A$30:A$1042));LIGNE()))

Nom défini Liste utilisé pour les validations en Feuil2!Z9:AI9 :

=DECALER(Feuil1!$C$1;;;EQUIV("zzz";Feuil1!$C:$C))

Maintenant masque les lignes que tu veux en Feuil1.

Bonne journée et A+

 

[phlaurent55]

Re : listes déroulantes des lignes non masquées

Bonjour à tous,

ma petite contribution en pièce jointe

à+
Philippe

 

[job75]

Re : listes déroulantes des lignes non masquées

Re, hello Philippe,

On peut construire la liste par VBA comme DoubleZero 🙂

Fichier (2) avec dans le code de Feuil2 :

Private Sub Worksheet_Activate()
With Feuil1 'CodeName de la feuille
  .[C:C].ClearContents
  On Error Resume Next 'si tout est masqué
  .[A30:A1042].SpecialCells(xlCellTypeVisible) _
    .SpecialCells(xlCellTypeConstants).Copy .[C1]
End With
End Sub

Edit : ajouté On Error Resume Next

A+

 

[DoubleZero]

Re : listes déroulantes des lignes non masquées

Re-bonjour, bonjour, Philippe 🙂,

Merci, job75, pour l'association de ces deux conditions que je n'ai pas su 😱 trouver dans le fichier déposé en #3...

SpecialCells(xlCellTypeVisible).SpecialCells(xlCellTypeConstants).

Une autre suggestion ci-après.

A bientôt 🙂

 

[Ilino]

Re : listes déroulantes des lignes non masquées

Bonjour a tous
un grand merci pour tous le monde .....
SOUCI DE JOUR RESOLUT
GRAZIE