ADRESSE / EQUIV / MAX - recherche sur plusieurs FDC

Résolu
F60lebaladinverni Messages postés 125 Date d'inscription   Statut Membre Dernière intervention   -  
Vaucluse Messages postés 27336 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonsoir tout le monde,

la formule suivante :
=ADRESSE(EQUIV(MAX(sheet1!B:B);sheet1!B:B;0);;;"sheet1")
me permet de retourner l'adresse de la cellule maximum de la colonne B de la feuille de calcule "sheet1"
Jusque là, je pense que ça peut aller.

Ma question est la suivante : si je veux rechercher l'adresse de la cellule max. de la colonne B de toutes les feuilles de calcul de 1 à 20 ? c'est quoi la formule ? Je bloque sur la fin ...
=ADRESSE(EQUIV(MAX(sheet1:sheet20!B:B);sheet1:sheet20!B:B;0);;;"sheet1")

Je ne sais pas quoi mettre et à chaque fois Excel me retourne une erreur de valeur (#VALEUR!)
Merci pour votre aide (si solution existe)

3 réponses

  1. Raymond PENTIER Messages postés 58227 Date d'inscription   Statut Contributeur Dernière intervention   17 490
     
    Bonjour.
    Ce n'est pas la fin qui pose problème, mais le contenu même de la formule !
    En effet la fonction MAX accepte de chercher dans plusieurs feuilles, mais pas la fonction EQUIV ...
    0
    1. F60lebaladinverni Messages postés 125 Date d'inscription   Statut Membre Dernière intervention   2
       
      Merci pour ta réponse

      Y a t-il un autre moyen du coup de rechercher l'adresse du maximum de toutes les colonnes B de mon classeur avec une seule formule ?
      0
  2. Vaucluse Messages postés 27336 Date d'inscription   Statut Contributeur Dernière intervention   6 453
     
    Bonjour
    pas de solution miracle mais si vous avez envie de taper la formule pour 20 feuilles, la voici pour 3:

    =EQUIV(MAX(Feuil1:Feuil3!B:B);SI(NB.SI(Feuil1!B:B;MAX(Feuil1:Feuil3!B:B));Feuil1!B:B;SI(NB.SI(Feuil2!B:B;MAX(Feuil1:Feuil3!B:B));SI(NB.SI(Feuil3!B:B;MAX(Feuil1:Feuil3!B:B));Feuil3!B:B)));0)

    éventuellement pour simplifier un peu, en deux cellules:
    une pour ressortir le max des feuilles
    et l'autre ci dessus avec l'adresse de cette cellule à la place de MAX(....)

    crdlmnt
    0
  3. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour tt le monde

    peut-^tre avec du Vba
    donne la première adresse trouvée de la valeur maxi
    Option Explicit
    '----------------------------------------------------------------
    Sub localiser_adresse()
    Dim Nbre As Byte, Cptr As Byte
    Dim Maximum As Double, Maxi As Double
    Dim Adresse As String, Onglet As String

    Application.ScreenUpdating = False
    Nbre = ThisWorkbook.Sheets.Count
    Maximum = 0
    For Cptr = 1 To Nbre
    With Sheets(Cptr)
    Maxi = Application.Max(.Columns("B"))
    If Maxi > Maximum Then
    Adresse = .Columns("B").Find(Maxi, .Range("B" & 1000000), xlValues).Address
    Maximum = Maxi
    Onglet = .Name & "!"
    End If
    End With
    Next
    MsgBox "localisation valeur Maximum: " & Onglet & Adresse
    End Sub


    maquette
    https://mon-partage.fr/f/JOhYCHwi/
     Michel
    0
    1. Vaucluse Messages postés 27336 Date d'inscription   Statut Contributeur Dernière intervention   6 453
       
      Salut Michel
      ben oui, comme ça ça fait mieux ;-)
      Bien cordialement
      0