fonction est vide

Bonjour,

Matricielle: Validation par Ctrl + Shift + Entrée
=SI(A1:A65535="";1;INDIRECT("A"&MAX(SI(A1:A65535<>"";LIGNE(A1:A65535)))))

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing
brault-lavoieNOSPAM@sympatico.ca
--
"titi" <nomail@mail.com> a écrit dans le message de
news:OQmJf2MKFHA.1528@TK2MSFTNGP09.phx.gbl...

bonjour
est ce qu il ya une fonction et non une macro quii dans une feuille me
donne

la dernière valeur contenu dans la colone A et s'il n y a rien 1
Merci
A+
Th

Bonsoir...
Désolé, un peu de VBA et fonction perso
à recopier dans ton classeur de macro perso...
Tu retrouveras cette fonction parmi les fonctions personnalisées.

Function DERNIEREDECOLONNE(plg As Range)
' Renvoie le contenu de la dernière cellule non vide d'une colonne
Application.Volatile
With plg.Parent
With .Cells(.Rows.Count, plg.Column)
If Not IsEmpty(.Value) Then
DERNIEREDECOLONNE = .Value
ElseIf IsEmpty(.End(xlUp)) Then
DERNIEREDECOLONNE = ""
Else
DERNIEREDECOLONNE = .End(xlUp).Value
End If
End With
End With
End Function

"titi" <nomail@mail.com> a écrit dans le message de news:
OQmJf2MKFHA.1528@TK2MSFTNGP09.phx.gbl...

bonjour
est ce qu il ya une fonction et non une macro quii dans une feuille me
donne la dernière valeur contenu dans la colone A et s'il n y a rien 1
Merci
A+
Th

bonjour titi,

=INDIRECT(ADRESSE(NBVAL(A:A);1))

isabelle

bonjour
est ce qu il ya une fonction et non une macro quii dans une feuille me donne
la dernière valeur contenu dans la colone A et s'il n y a rien 1
Merci
A+
Th

Bonsoir,
Si toutes tes données sont dans la colonne A quelque soit l'emplacement de
tes données dans ta colonne même s'il y a des trous :
SI(SOMMEPROD(MAX((A1:A65535<>"")*LIGNE(A1:A65535)))>0;INDEX(A:A;SOMMEPROD(MAX((A1:A65535<>"")*LIGNE(A1:A65535))));1)

Cordialement

"titi" <nomail@mail.com> a écrit dans le message de news:
OQmJf2MKFHA.1528@TK2MSFTNGP09.phx.gbl...

bonjour
est ce qu il ya une fonction et non une macro quii dans une feuille me
donne la dernière valeur contenu dans la colone A et s'il n y a rien 1
Merci
A+
Th

Ok mais ne fonctionne plus correctement quand il y a des trous dans la
colonne A

Cordialement

"isabelle" <hoHoho@hohoHo> a écrit dans le message de news:
%23Bjl49MKFHA.3916@TK2MSFTNGP14.phx.gbl...

bonjour titi,

=INDIRECT(ADRESSE(NBVAL(A:A);1))

isabelle

bonjour
est ce qu il ya une fonction et non une macro quii dans une feuille me
donne la dernière valeur contenu dans la colone A et s'il n y a rien 1
Merci
A+
Th

merci a tous
et surtout a isabelle
j ai quelques imprecission mais si j ai d'autre problème je me permettrai de
vous redéranger un peu ...désolé...
A+
Th


"isabelle" <hoHoho@hohoHo> a écrit dans le message de news:
%23Bjl49MKFHA.3916@TK2MSFTNGP14.phx.gbl...

bonjour titi,

=INDIRECT(ADRESSE(NBVAL(A:A);1))

isabelle

bonjour
est ce qu il ya une fonction et non une macro quii dans une feuille me
donne la dernière valeur contenu dans la colone A et s'il n y a rien 1
Merci
A+
Th

ok,

=INDIRECT(ADRESSE(EQUIV(9^9;A:A;1);1))

isabelle

Ok mais ne fonctionne plus correctement quand il y a des trous dans la
colonne A

Cordialement

"isabelle" <hoHoho@hohoHo> a écrit dans le message de news:
%23Bjl49MKFHA.3916@TK2MSFTNGP14.phx.gbl...

bonjour titi,

=INDIRECT(ADRESSE(NBVAL(A:A);1))

isabelle

bonjour
est ce qu il ya une fonction et non une macro quii dans une feuille me
donne la dernière valeur contenu dans la colone A et s'il n y a rien 1
Merci
A+
Th

Bonsoir
Si tu as du texte et/ou du numérique
=+SI(NBVAL(A1:A65535)=0;1;INDEX(A1:A65535;MAX((NBCAR(A1:A65535)<>0)*LIGNE(1:65535));1))

Valider CTRL+SHIFT+ENTREE

Salutations
RaMa
"titi" <nomail@mail.com> a écrit dans le message de news:
OQmJf2MKFHA.1528@TK2MSFTNGP09.phx.gbl...

bonjour
est ce qu il ya une fonction et non une macro quii dans une feuille me
donne la dernière valeur contenu dans la colone A et s'il n y a rien 1
Merci
A+
Th