[Résolu][Calc]Recherche dernière cellule suivant critère

[Claudius723]

Bonjour, je suis maintenant un peu familiarisé avec zBasic, mais je rencontre un problème, je voudrais extraire la valeur non vide de la dernière cellule d'une colonne suivant un critère : ci joint mes deux tableaux
Le critère est "Chèque n°" , colonne D2:D450, feuille "Recherche" et la valeur non vide est dans la colonne E2:E450, le résultat est à reporter dans la feuille "Resultat" cellule A2
Quelle fonction puis-utiliser?
Merci d'avance

[Dude]

Salut,

Une macro ne fait rien d'autre qu'automatiser des actions que tu ferais via menu ou dialogue.
Donc, explique nous pas-à-pas comment tu ferais cette recherche manuellement ?

Tu noteras qu'il y a un savoureux mélange dans tes numéros de chèque qui sont tantôt numérique ou texte :

[Jeff]

Bonjour,

explique nous pas-à-pas comment tu ferais cette recherche manuellement ?

+ 1

De même, est-ce que le recours à une macro est indispensable, car cela est faisable par formule.

Je n'ai pas de version AOO sous la main pour tester avec ton fichier joint, mais une formule du type :

Code : Tout sélectionner

=INDIRECT("E"&MAX(LIGNE(A2:A450)*((D2:D450)="Chèque n°")*NON(ESTVIDE(E2:E450))))

validée matriciellement (Ctrl + Maj + Entrée) devrait faire l'affaire, et récupérer la donnée, qu'elle soit chiffre ou texte.

A +
 

Ajout : Ce qui donne avec ton classeur et les référence de feuilles correctes : Code : Tout sélectionner =INDIRECT("Recherche.E"&MAX(LIGNE(A2:A450)*((Recherche.D2:D450)="Chèque n°")*NON(ESTVIDE(Recherche.E2:E450))))

[Claudius723]

Bonjour Dude, cela ne marche pas , en fait la valeur recherchée doit être dans ce cas : dernière cellule non vide avec Chèque n° = "7258961"

[Jeff]

Qu'est-ce qui ne "marche pas" ? Merci de détailler

[Claudius723]

La réponse est "# NOM ? ", j'ai supprimé les données texte dans la colonne E, il n'y a plus que des nombres, mais le résultat est le mème.

[Jeff]

On ne sait plus à qui tu réponds

explique nous pas-à-pas comment tu ferais cette recherche manuellement ?

Tu noteras qu'il y a un savoureux mélange dans tes numéros de chèque qui sont tantôt numérique ou texte

Réponds déjà sur ça.

est-ce que le recours à une macro est indispensable

Réponds ensuite sur ça.

La réponse est "# NOM ?

fais nous une capture d'écran avec la cellule en erreur et la barre de formule visible.

A +

[Oukcha]

@ Claudius723 :

• si votre question concerne les macro, postez à la suite
• si votre question concerne une formule, postez en section Tableur

Cordialement

[Claudius723]

Effectivement, ma question portera sur une formule, donc je passe sur tableur.

La suite ici : viewtopic.php?t=68734.

Sujet balisé par la modération

[Dude]

La meilleure macro est celle qu'on ne fait pas.
Il convient toujours de privilégier ce que le logiciel sait faire nativement.

Via codage avec zBasic, on aurait pu arriver au même résultat avec une belle gymnastique pour filtrer sur une feuille temporaire :

Code : Tout sélectionner

Sub Main
	GlobalScope.BasicLibraries.loadLibrary("zBasic")
	'Filtre temporaire 
	Dim oFiltre as variant
	laPlage = zPlage.Occupation ("Recherche")
	oFiltre = zFiltre.Demarre("Recherche", laPlage)
	zFiltre.Parametre(oFiltre, "entete", "O")
	zFiltre.Colonne(oFiltre, 4, "", 2, "N", "Chèque n°")
	zFeuille.Cree("Tempo")
	zFiltre.Execute(oFiltre, "Tempo", "A1")
	'Récupèrons l'info dans la dernière ligne
	laPlage = zPlage.Occupation ("Tempo") 
	laCellule = Split(laPlage, ":")
	leContenu = zCellule.Lit("Tempo", laCellule(1), "C")
	zCellule.Ecrit("Resultat", "A2", "C", leContenu)
	'Suppression du filtre
	zFeuille.Supprime("Tempo")
End Sub