fonction de requête MySQL dans Excel

Question

Bonjour,

Je cherche &#224; faire en VBA pour Excel une fonction qui fasse une reherche dans une base de donn&#233;es MySQL et retourne une unique valeur (un peu comme un VLookup de Excel).
J'ai utilis&#233; l'enregistrement d'une macro pour cr&#233;er une proc&#233;dure d'attaque de ma base MySQL, mais je ne vois pas comment faire pour transformer cette proc&#233;dure en fonction, car elle &#233;crit syst&#233;matiquement la valeur retourn&#233;e dans une cellule (range d&#233;fini dans la propri&#233;t&#233; Destination) et m&#234;me en retournant le contenu de cette cellule, ma fonction en marche pas (elle ne se met pas &#224; jour syst&#233;matiquement, par exemple, ou renvoie #value, etc..).
Voici le texte de ma fonction:

Function Macro2(valeur As String)
'
' Macro2
' Macro recorded 13.10.2005 '
    With ActiveSheet.QueryTables.Add(Connection:= _
        "ODBC;DATABASE=testamoi;DSN=myodbc;OPTION=0;PORT=0;SERVER=localhost;UID=root", _
        Destination:=Range("A1"))
        .CommandText = Array( _
        "SELECT tabletest_0.F3" & Chr(13) & "" & Chr(10) & "FROM testamoi.tabletest tabletest_0" & Chr(13) & "" & Chr(10) & "WHERE (tabletest_0.F1=" & valeur & ")" _
        )
        .Name = "Query from myodbc"
        .FieldNames = False
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = True
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .PreserveColumnInfo = True
        .Refresh BackgroundQuery:=False
    End With
    Macro2 = Range("A1").Value
    
End Function

Pourriez-vous m'aider ?

Merci beaucoup!
Eric

ordi50_nerf · Answer

Je travail &#233;galement sur le m&#234;me sujet et j'ai le m&#234;me probl&#232;me &#224; quelque chose pr&#232;s.D&#233;s que je trouve des ssolution je te recontact

Fonction de requête MySQL dans Excel

1 réponse

Discussions similaires