Dernière ligne remplie

[Victor]

Bonjour le forum,

j'ai un fichier que je rempli journellement, et le hic c'est que j'aimerais y reporter la dernière cellule remplie sur un autre oglet .

Le problème est qu'elle formule mettre pour qu'excel comprenne qu'il doit mettre la dernière ligne remplie de la colonne A par exemple.

D'avance merci pour vos lumières.

Victor

 

[Raja]

Re : Dernière ligne remplie

Bonjour,

La formule suivante ramène la valeur numérique de la colonne A :

=RECHERCHE(9^9;A:A)

Si c'est une valeur alphanumérique :

=RECHERCHE("z";A:A)

 

[Victor]

Re : Dernière ligne remplie

Salut Raja,

merci pour ta réponse mais dans la cellule il peut y avoir auusi bien du texte que des chiffres, alors y a-t-il une solution dans la formule ?

D'avance merci .

Victor

 

[d.ryba]

Re : Dernière ligne remplie

Essaye cette solution

Sub CopyLastCell()
Dim Onglet
Onglet = Worksheets.Count                  'Compte le nombre d'onglets
Sheets(Onglet - 1).Select                  'Sélectionne l'avant dernier onglet
Range("A1").End(xlDown).Offset(0, 0).Copy  'Copie la dernière cellule en bas de la colonne "A"
Sheets(Onglet).Activate                    'Active le dernier onglet
Range("A1").Select
ActiveSheet.Paste                           'Colle la dernière cellule de A,
                                           'dans le dernier onglet (en théorie le nouveau) en A1
End Sub

A toi biensur de l'adapter.

 

[Victor]

Re : Dernière ligne remplie

Salut d.ryba, mais j'ai aucune idée du VBA et aimerait trouver une solution avec les formules.

Merci pour ta réponse.

Victor

 

[Monique]

Re : Dernière ligne remplie

Bonjour

Le n° de ligne de la dernière cellule remplie de la colonne A :
=MAX(EQUIV(9^9;$A:$A);EQUIV("zz";$A:$A))

Son contenu :
=DECALER($A$1;MAX(EQUIV(9^9;$A:$A);EQUIV("zz";$A:$A))-1;0)

 

[Victor]

Re : Dernière ligne remplie

Salut Monique,

merci pour ta réponse, j'ai essayé ta formule et la réponse est #N/A
voici ma formule :
'=DECALER(Feuil1!$A$1;MAX(EQUIV(9^9;Feuil1!$A:$A);EQUIV("zz";Feuil1!$A:$A))-1;0)

peux-tu me dire ou est l'erreur ?

D'avance merci. Victor

 

[Tibo]

Re : Dernière ligne remplie

Edit : message annulé

Because j'ai dit des bêtises ... 😱

Mais je reviens avec d'autres formules 😉

A tout de suite

Une autre approche avec une formule matricielle :

=MAX((A1:A100<>"")*LIGNE(A1:A100))

Formule matricielle à valider par CTRL + MAJ + ENTREE

Inconvénient : n'accepte pas de référence à une colonne entière. Il faut donc adapter la plage de cellules.

@+

 

[Monique]

Re : Dernière ligne remplie

Re et bonjour,

Il n’y a soit que des nombres soit que du texte ?

Essayer comme ça (un peu lourd ou long)
=DECALER($A$1;MAX(SI(NB($A:$A)>0;EQUIV(9^9;$A:$A);0);SI(NBVAL($A:$A)<>NB($A:$A);EQUIV("zz";Feuil1!$A:$A);0))-1;0)

Au cas où A:A serait entièrement vide (bof)
=SI(NBVAL($A:$A)=0;"";DECALER($A$1;MAX(SI(NB($A:$A)>0;EQUIV(9^9;$A:$A);0);SI(NBVAL($A:$A)<>NB($A:$A);EQUIV("zz";Feuil1!$A:$A);0))-1;0))

 

[Victor]

Re : Dernière ligne remplie

Re Monique je vais essayer ta formule , pour ton info il y a des nombres ET du texte.

@ +

 

[Victor]

Re : Dernière ligne remplie

Salut Tibo, pour trouver le N de la ligne ta formule fonctionne très bien mais c'est pas cela que je recherche.
Mais MERCI pour ta réponse.

Re Monique, un très GRAND merci ta formule fonctionne à merveille. MERCI encore et à une prochaine.

Victor

 

[Monique]

Re : Dernière ligne remplie

Re,

Pour avoir le contenu de la cellule avec la formule de Tibo :

=DECALER(A$1;MAX(SI(A$1:A$100<>"";LIGNE(A$1:A$100)))-1;0)

Idem (mais dépense plus d’énergie, non ?)
=DECALER(A$1;MAX((A$1:A$100<>"")*LIGNE(A$1:A$100))-1;0)

 

[Victor]

Re : Dernière ligne remplie

Re Monique,

j'ai essayé ta formule mais je dois faire une erreur, car le résultat n'est pas juste.............mais je vais encore essayer.

@ + MERCI

 

[Tibo]

Re : Dernière ligne remplie

Bonjour Victor,

Il s'agit d'une formule matricielle.

Elle doit donc être validée par la succession de touches : CTRL + MAJ + ENTREE

Dès que la validation est correcte, des accolades apparaissent dans la barre de formule de chaque côté de la formule

@+

 

[Victor]

Re : Dernière ligne remplie

Salut Tibo,

ok MERCI j'avais complètement oublié cela.

@ + Bonne journée. Victor