traduire MIN(Feuil1:Feuil3!A2) en vba

[albert]

Bonsoir à tous et à toutes, forumiens, forumiennes,

Je cherche depuis un bon moment à traduire =MIN(Feuil1:Feuil3!A2) en vba, sans succès. :unsure:
Merci d’avance à qui pourra me donner un coup d’main

albert

 

[Baside]

Rebonjour JeanMarie le fil le forum

J'ai trouvé Lien supprimé

J'ai testé, c'set tout bon

Merci et bonne fin de journée, Baside

 

[JeanMarie]

Re...

Essaye ce code

MsgBox Application.Evaluate('min(' + Sheets(1).Name + ':' + Sheets(Sheets.Count).Name + '!A1:C20)')

@+Jean-Marie

 

[albert]

JeanMarie,
je tourne le code dans tous les sens, je le tords, le denature, je le supplie... bref, il ne veut rien savoir


albert

 

[Baside]

Rebonjour Albert

J'avais arreter ma solution devant la formule proposée, mais devant ton désespoir je vais la reprendre, après un petit en cas

Baside

 

[Baside]

Bonjour Albert le fil le forum

Pour ne pas gâcher ta fin de soirée...

Baside

Tu peux faire varier les n° de feuilles en adaptant [file name=MINCA2.zip size=9363]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/MINCA2.zip[/file]

 

[albertt]

merci Baside,
c'est impeccable, et c'est une piste que j'avais trouvee avant ma sieste (sieste necessaire pour reposer les yeux apres tous ces efforts)

plus qu'a adapter
http://forum.hardware.fr/hardwarefr...-fonction-personnalisee-MAX-sujet-64594-1.htm

a+
albert