XL 2019 Recherche de deux dernières informations

  • Initiateur de la discussion Initiateur de la discussion JMP56
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

JMP56

XLDnaute Nouveau
Bonjour, dans un tableau de gestion de compte ne cessant de grossir, j'ai dans la colonne A des dates et dans la colonne D des rubriques en format texte de dépense ou de rentrée.
Afin de calculer les économies réalisées entre deux salaires je cherche une formule pour extraire vers deux cellules AE19 et AE20:
- en AE 19: la date notée en colonne A de l'avant dernier salaire mentionné "salaire" dans la colonne D
- en AE 20: la date notée en colonne A du dernier salaire mentionné "salaire" dans la colonne D
Merci de votre soutien.
 
Bonjour,
J'aimerais mais il s'agit d'un fichier contenant des données confidentielles.
Mon fils m'a fait une macro mais elle fige le tableur et nécessite d'appuyer sur un bouton. Je préfère la formule qui raffraîchit les données en permanence. J'imagine que pour accélérer la recherche il convient de limiter la recherche à la dernière ligne rentrée (environ 1000 données par année).
Cordialement,
 
Bonjour

J'aimerais mais il s'agit d'un fichier contenant des données confidentielles.
Pour infos
On ne joint jamais le fichier original
On prend le temps de créer un fichier ex nihilo
avec des choses du style
NOM1 PRENOM1 ADRESSE1 CP1VILLE TELEPHONE1
etc...
Cela prend en général moins de 23 minutes
Et les jours sans pluie (mais avec macros) moins de 7
😉
 
Re

On peut aussi s'aider de petits outils pour se faciliter la tâche 😉
Un petit exemple tout juste sorti du four.
VB:
Sub Anonymizator()
Sheets.Add
[A1:K1] = "=""ENTETE""&COLUMN()"
[A2:K100] = "=COLUMN()&""-""&ADDRESS(ROW(),COLUMN(),4)"
With [A1].CurrentRegion
    .Borders.Weight = 2
    .Value = .Value
End With
End Sub
 
Bonjour JMP, Djidji, Staple,
Un essai en PJ avec comme formules en AE19 et AE20 :
VB:
=INDEX(A:A;GRANDE.VALEUR(SI(D:D="Salaire";LIGNE(D:D));2))
=INDEX(A:A;GRANDE.VALEUR(SI(D:D="Salaire";LIGNE(D:D));1))
A valider par Ctrl+Maj+entrée car formules matricielles.
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
291
  • Résolu(e)
Microsoft 365 DATEDIF
Réponses
11
Affichages
193
Retour