Affichage de la derniere cellule renseignée

[Pendibidu]

Bonjour à tous,

Je souhaiterais ,sur la ligne du total, afficher la derniere cellule du compteur renseignée, en sachant qu'il y aura des lignes vides dans ce fichier.

Merci par avance,

PS fichier joint.(le total doit etre de 12)

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

 

[Hervé]

Bonjour pendibidu

Je vais surement dire une bêtise digne d'un zop, mais bon pas grave :

As-tu essayer avec la fonction max : =MAX(F10:F26)

salut

 

[Pendibidu]

Ok ca marche,

Merci Hervé! Je n'y avais pas du tout pensée !!

Pendibidu

 

[Sylvie]

Bonjour Pendibidu, Hello Hervé, le Forum

aucune raison de laisser Hervé cottoyer seul les coteaux de l'erreur A mon tour de plonger ! :unsure:
Il semble que ton compteur indique en fait un nombre de valeurs non vides
Si c'est la cas tu peux egalement passer par la fonction NBVAL par ex =NBVAL(E10:E26) = 12



Bonne journée

 

[Robert]

Bonjour Pendibidu, bonjour le forum,

Une macro à placer dans le composant Worksheet (Feuil1(feuil1) par esxemple) de VBE :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim li As Integer 'déclare la variable li

li = Target.Row 'définit la variable li

'place en F27 le compteur en fonction du la cellule éditée
Range('F27').Value = Cells(li, 6).Value
End Sub

Édition :

Oops bonjour Hervé et Sylvie... Zop pour moi alors...

Message édité par: Robert, à: 12/10/2005 12:01

 

[Pendibidu]

Hello Sylvie,
Par curiosité je viens d'essayer ta formule mais je n'arrive pas au meme resultat !!
Je trouve 16.

Dans tous les cas merci de t'y etre penchée !!

Biz

Pendibidu

 

[Jocelyn]

Bonjour le Forum,
Bonjour Pendibidu, Hervé, Sylvie, Robert,


Et bien moi je suis en accord avec Hervé pour le =MAX(F10:F26) le nbval de Sylvie fonctionne tout aussi bien et je suis désolé Robert je ne me prononce pas sur ta macro qui je pens fonctionne parfaitement(je suis vraiment pas assez bon.

Par contre je conseil a Pendibidu de changer sa formule =SI(C11='';'';F10+1) de la colonne F

tu dis Pendibidu (sachant qu'il y aura des lignes vides dans ce fichier.)
a ce moment la au niveau de ta ligne vide ta formule va renvoyer rien ce qui fait que les lignes suivante vont te renvoyer '#valeur!'

Donc des la cellule F10 mets cette formule a étirer vers le bas
=SI(C10='';'';MAX($F$9:F9)+1)
attention a respecter les $

Jocelyn

 

[Pendibidu]

Salut Jecelyne,
Merci pour ton astuce! J'ai rectifie la formule pour eviter les desagrements futurs !!! Apres on s'arrache les cheuveux et on ne comprend pas pourquoi ca ne marche plus ... lol

Many thanks,

Pendibidu