Salut
 
l'objet de ce code est de récupérer le max des seuls champs d'une colonne Y qui répondent à la concatenation des colonnes A et B, variables d'entrée.
 
Voila mon code:
'Function num_certificat(name As String, etablissement_court As String, nat_biocarburant As String) As Boolean
'database_seq = "Séquence"
'database_ref = "Référence"
'queryString = _
"SELECT max(database_seq) FROM liste_MASTER.xls WHERE range(database_ref)=( etablissement_court & nat_biocarburant)"
'returnArray = SQLRequest(liste_MASTER.xls, queryString, Worksheets("données" ).Range("E1" ), 2, False)
'If name = "6" Then
'    For Each st In Worksheets("Fichier Master" ).Range("Référence" )
'        If st.Value = etablissement_court & nat_biocarburant Then
'        Else
            'rien
'        End If
'    Next
'Else
'End If
'End Function
 
Ne vous préoccupez pas du if then else end if; ce juste le returnArray qui est interessant, je sais que ce une matrice; je pense pouvoir récupérer la valeur max comme suit:
max= returnArray(0) en ayant résolu les pb suivants!!
premièrement j'aimerai savoir si max existe comme fonction. Deuxièment VBA me dit que ma fonction SQLRequest n'est pas defini. J'ai pourtant ajouter dans les references tout ce qui pouvait etre du active X ou de l'ADO!!!
 
Je bloque, merci pr votre aide!
 
lden