je cherche une boucle qui retourne la valeure min d'un champ d'une table
voila le code que j'ai essayé
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Commande20_Click()
Dim MaBase As Database
Dim MaTable As TableDefs
Dim MonChamp As Field
Dim MinNombre As Integer
Set MaBase = CurrentDb
Set MaTable = Table1
With MaTable
Set MonChamp = Nombre
End With
Set MinNombre = Min(MonChamp)
Debug.Print MinNombre
End Sub
la fonction min n'existe pas je crois?