Formule qui compte le nombre de cases vides...

[Ludo 69006]

Bonjour,

Dans un tableau commercial, je cherche une fonction qui renvoie le nombre de mois que le client n'a pas commandé (égal au nombre de cases vides successives et ce, jusqu'à ce qu'il y en ait une pleine).

Le tableau se présente ainsi :

Mars 2006 | Février | Janvier | Décembre 2005...
               |            |             |        500€

Dans le cas ci-dessus, ma fonction marche. Elle retourne 3.
Mais dans le cas où la dernière commande du client date de plus de 7 mois, cela plante car j'ai déjà utilisé le nombre maximum de fonction toléré par Excel dans 1 case :

=SI(NBVAL(M260:S260)=0;'+6';SI(NBVAL(M260:R260)=0;6;SI(NBVAL(M260:Q260)=0;5;SI(NBVAL(M260:P260)=0;4;SI(NBVAL(M260:O260)=0;3;SI(NBVAL(M260:N260)=0;2;SI(NBVAL(M260)=0;1;0)))))))

Dans cet exemple, j'ai pris la ligne 260 et le mois de mars 2006 (le 1er - le plus à gauche) correspond à la colonne M.

Quelqu'un peut-il me donner une formule moins lourde et plus efficace? sachant que chaque mois le tableau prend une colonne supplémentaire et que pour le moment il en dispose de 25...

Merci par avance,

Ludovic MAOLA

 

[Marco60]

Salut Ludo,
As-tu essayé la fonction NB.VIDE??

A+

Marc

 

[Ludo 69006]

Oui, j'ai essayé!!!

Cette fonction compte le nombre de case vide. Celle que je souhaite doit s'arrêter à la première valeur pour dire : 'il y a tant de case vides jusqu'à la première pleine'

Exemple :

Mars 2006 | Février | Janvier | Décembre 2005 | Novembre | ...
               |            |             |        300€         |                 |

Avec ces 5 colonnes, ta fonction va me retourner 4 alors que j'aimerais qu'elle retourne 3.

Merci quand même...

 

[Brice]

Bonjour,

Tu peux essayer de creer un module et d'y ajouter cette fonction :

Function CompteVide(r, c)

Do While Cells(r, c).Value = ''
c = c + 1
Loop
CompteVide = c

End Function

Ensuite dans la cellule dans laquelle tu veux obtenir le nombre de cases vides, tu tapes =CompteVide(r,c)

en remplacant r par le n° de ligne de la case à partir de laquelle tu veux commencer à compter

en remplacant c par le n° de la colonne de la case à partir de laquelle tu veux commencer à compter

exemple :

CompteVide(1,1)

voilou
A+

 

[JJ59]

Bonjour Ludo69006, Marco60

Voici une idée à adapter si elle te convient

Une ligne ajoutée mais qui peut être masquée.

bon aprés-midi à tous

JJ59 [file name=Classeurv1_20060322160756.zip size=1616]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeurv1_20060322160756.zip[/file]

 

[Brice]

Brice écrit:

Bonjour,

Function CompteVide(r, c)

Do While Cells(r, c).Value = ''
c = c + 1
Loop
CompteVide = c

End Function

petite rectification :

Function CompteVide(r, c)

Do While Cells(r, c).Value = ''
c = c + 1
Loop
CompteVide = c-1

End Function


A+

 

[Ludo]

JJ59,

Ca a l'air de marcher sur ton tableau...
Chapeau!!

Par contre, je n'arrive pas à l'adapter à mon tableau.

Peuxt-tu jeter un coup d'oeil STP ?

Ma formule actuelle correspond à la colonne F

Merci par avance

 

[ludo]

 

[JJ59]

Re

Le fichier n'est pas passé.

A+

JJ59

 

[ludo]

 

[ludo]

comment faire ?

 

[JJ59]

re

dans la rubrique forum, tu trouveras un tutoriel
qui t'expliques comment faire.
en résumé.
format ZIp, moins de 50Ko, pas d'accent, d'espace,
de caractères spéciaux.

A+

JJ59

 

[Brice]

la fonction dont je te parlais çi joint [file name=LudoCompte.zip size=8223]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/LudoCompte.zip[/file]

 

[Ludo 69006]

[file name=fonctionexcelludo69006.zip size=11629]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/fonctionexcelludo69006.zip[/file]

 

[Jocelyn]

Bonjour le forum,
Bonjour Ludo, Marco60, Brice, jj59,

joli la macro Brice.

jj59 superbe résolution par formule par je me demandais si il n'etait pas préferable de changer la formule de la ligne 5 :

=SI(SOMME($C$7:INDIRECT(ADRESSE(7;COLONNE())))>0;COLONNE();'')

la partie en rouge par : INDIRECT(CAR(67)&7) et ceci en prévision d'insertion de cellules probable.

Jocelyn