Valeur visible

[ascal44]

Bonjour le forum,
je joint un fichier pour plus de compréhension.

Je voudrais afficher la dernière valeure visible d'une colonne contenant une formule. Sans afficher la valeur des dernières lignes masquées.

 

[Dan]

Re : Valeur visible

Bonjour,

Place cette formule en J2 --> {=INDEX(N:N;MAX(LIGNE(N6:N1000)*(N6:N1000<>"")))}

Formule matricielle à confirmer par CTRL + MAJ (shift) + ENTREE pour avoir les accolades.

Amicalement

Dan

 

[ascal44]

Re : Valeur visible

Merci DAN, mais celà ne correspond pas à ce que je veux.

Je veux la dernière valeur visible de la colonne N.

Si quelqu'un a la solution....

 

[Celeborn61]

Re : Valeur visible

Salut,

En VBA tu écris cette fonction:

Function ValeurVisible(Plage As Range)
For Each C In Plage
If Rows(C.Row).Hidden = False And C.Value <> Empty Then
ValeurVisible = C.Value
End If
Next C
End Function


Et dans la cellule J2, tu appel la fonction par la fonction, insertion, fonction, fonctions personnalisées, ValeurVisible
En paramétre, les cellules sources de ton tableau. (N6:N70)
Et voila.

 

[Dan]

Re : Valeur visible

Re,

Avec la macro de Celeborn61,

définis PLAGE :
- menu insertion/nom/définir
- tape PLAGE dans nom dans le classeur
- dans ref mets cette formule -> =DECALER(Feuil1!$N$6;;;NB(Feuil1!$N:$N); )

Place toi en J2 et mets --> =ValeurVisible(Plage)

La macro est à placer dans un module en VBA.

En dessous de FUNCTION...... mets aussi DIM C as RANGE

A bientôt

Dan

 

[ascal44]

Re : Valeur visible

Merci pour votre travail.
Mais je n'arrive pas à l'appliquer sur mon fichier avec mes modestes compétences.
Pourriez vous m'envoyer le fichier modiié ?

 

[Dan]

Re : Valeur visible

re,

Voici ton fichier

Amicalement

Dan

 

[ascal44]

Re : Valeur visible

Merci Dan C'est Ok