Trouver l'information dans l'avant dernière cellule d'une colonne

Mayou0202 -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour

J’ai un fichier comprenant plusieurs feuilles. Dans la colonne A de la première feuille (appelée « TdeM »), j’ai une table des matières avec le nom des différentes feuilles. Dans la colonne B de TdeM, j’ai écris une formule permettant d’aller chercher l’information dans la dernière cellule non vide dans la colonne A des autres feuilles. Elle va comme suit :

=RECHERCHE("zzzzzz";INDIRECT("'"&A8&"'!A:A"))

La formule fonctionne super bien. Toutefois, c’est l’information dans l’AVANT-DERNIÈRE cellule de la colonne A dont j’ai besoin au bout du compte. Et là, je sèche.

Quelqu'un aurait une solution simple?

3 réponses

  1.
    Vaucluse Messages postés 27336 Date d'inscription   Statut Contributeur Dernière intervention   6 453
     
    Bonjour
    peut être avec (s'il n'y a pas de cellule vide en A:A de la feuil A8

    =INDEX(INDIRECT("'"&A8&"'!A:A");NBVAL(INDIRECT("'"&A8&"'!A:A"))-1)
    crdlmnt

    0
  2. Mayou0202
     
    Malheureusement, cela ne fonctionne pas. Je crois que les cellules fusionnées pourraient expliquer le tout.
    0
    1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
       
      Bonjour Mayou, Vaucluse

      ...."Je crois que les cellules fusionnées pourraient expliquer le tout."

      Dans ce cas: 
      Mettre le classeur sans données confidentielles en pièce jointe sur 
       https://mon-partage.fr
      Dans lien de téléchargement
       faire un clic  droit- copier l’adresse du lien   et  le coller dans votre message en cours sur ccm
      0
    2. Mayou0202
       
      Bonjour,

      Voici le lien vers un fichier exemple: 
      https://mon-partage.fr/f/oNBnrPzN/


      Il a fallu que je fasse une version simplifiée, car le fichier original contient trop de données que je devais modifier (il comporte 70 feuilles au moins, avec des années de changements).

      Je n'ai pas laissé la macro de la TdeM qui créer automatiquement les liens vers les différentes feuilles dans la colonne A, car le problème n'est pas là. Le bouton est quand même là.
      0
    3. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
       
      Tu demandes l'avant-dernier document mais Tu as le cas où tu n'as qu'un document (p.e: "lettre_prés")
      que fait-on dans ce cas ?
      0
    4. Mayou0202
       
      Dans toutes les feuilles, j'ai une ligne dans la colonne A "Retour à la table des matières". C'est celle-ci que je veux exclure en prenant l'avant-dernière donnée.
      0
  3. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Effectivement, "Retour à la table des matières" est à mettre ailleurs que dans la colonne "A"; une fois fait cette modif:
    ci dessous proposition de fonction en attendant que tu répondes à mon post "que fait on ? 
    Option Explicit
    '-------------------------------------------------------------
    Function av_dern_doc(Feuille As String)
    Dim Derlig As Byte, Lig As Byte
        With Sheets(Feuille)
            Derlig = .Columns("A").Find(what:="*", searchdirection:=xlPrevious).Row
            Lig = .Columns("A").Find(what:="*", after:=Cells(Derlig, "A"), searchdirection:=xlPrevious).Row
            av_dern_doc = .Cells(Lig, "A")
        End With
    End Function


    0