Discussion :

[oscar.cesar]

bonsoir à tous et à toutes
je cherche à realiser ceci
j'ai un textbox dont la valeur par default doit etre la plus grand valeur numerique presente dans une colonne A . en sachant que j'ignore le nb de ligne dans la colonne.

dans excel il y a la formule "valmax" qui est bien pratique mais en vb ???

cordialement

[Oh!Tofocus]

il y a peut être plus simple mais le code suivant marche trés bien

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Sub plus_grand()
'recherche dernière ligne de la colonne
derniere_ligne = Range("A65536").End(xlUp).Row
'initialise une valeur trés basse
mem_val = -999999
'passe en revue toutes les cellules de la colonne A
For Each test In Range("a1:a" & derniere_ligne)
'memorise la valeur la plus grande
 If test > mem_val Then
 mem_val = test
 End If
Next test
' résultat affiché en B1
Range("B1").Value = mem_val
End Sub

Bonsoir...

[alsimbad]

effectivement, il y a plus simple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Cells(1, 1) = Application.WorksheetFunction.Max(Columns(2))

[Oh!Tofocus]

en effet c'est plus court
mais bon l'important c'est de participer....
une petite revision des codages de base ne fait pas de mal
au fait ' alsimbad 'connais tu un site qui reprend les possibilités de WorksheetFunction. car je suis sur qu'il y a de nombreuses possibilités que je ne connais pas.

[AlainTech]

tu un site qui reprend les possibilités de WorksheetFunction.

J'en connais un excellent:


L'aide en ligne de VBA contient toutes les informations sur le langage, y compris la "Liste des fonctions de feuille de calcul disponibles dans Visual Basic".

Et pour la traduction en anglais:
http://www.developpez.net/forums/sho...d.php?t=214037

[alsimbad]

salut alaintech
c'est sur dit comme ça F1, mais pas facile a trouver cette liste. j'en ai conclu que le plus facile c'est de taper une fonction genre max, et aprées de presser f1. parce que par WorksheetFunction, on y arrive pas a la liste