Excel et requete ODBC avec date

mario_fr · 28 Avril 2009

Bonjour à tous,

Je suis manager d'une équipe de support utilisateurs (Support bureautique).
Chaque lundi je fais un report de la semaine précédente, sur les nombres d'incidents et de taches traitées par les techniciens.
Pour cela, j'ai créé une requête ODBC dans excel qui attaque la base de données de notre outil de ticketing. (Remedy pour ne pas le nommer).

Dans ma requête Query (Fichier joint), j'ai un champ nommé "Status_History_Closed_Time" pour lequel je renseigne les dates de la semaine précédente. Exemple : >#13/04/2009# Et <#18/04/2009#

Mon problème est le suivant : C'est que je suis obligé de rentrer dans ma requête Query pour modifier ces dates.
Ce que je souhaiterais c'est avoir une macro me permettant de changer les dates directement depuis Excel.

Si l'un d'entre vous avait la solution vous feriez un heureux.

Merci d'avance.

mario_fr · 29 Avril 2009

Re : Excel et requete ODBC avec date

Ça ne marche pas non plus.....

Si dans Msquery je mets des dates standards. Que j'enregistre une macro et qu'après coup j'exécute cette macro : çà fonctionne.

La dysfonctionnement survient lorsque j’intègre les variables dans la macro....

Concernant la solution de tototiti2008 qui consiste à modifier directement dans MsQuery les dates par >[Date1] Et <[Date2]
Cette solution fonctionne très bien dans Msquery. Les deux dates me sont bien demandées et la requête s'exécute correctement. mais lorsque je veux renvoyer les données sous excel j'ai l'erreur : Driver]Parameter missing

Si d'autres idées....
Merci encore pour votre aide.

PascalXLD · 29 Avril 2009

Re : Excel et requete ODBC avec date

mario_fr à dit:
La dysfonctionnement survient lorsque j’intègre les variables dans la macro....

C'est ce que j'avais remarqué voir mon post plus haut

MJ13 · 29 Avril 2009

Re : Excel et requete ODBC avec date

Bon Ok

Si dans Msquery je mets des dates standards. Que j'enregistre une macro et qu'après coup j'exécute cette macro : çà fonctionne.

et si tu remplaces maintenant comme ceci:

Code:

Sub Test()
Dim annee, moisdeb, jourdeb, moisfin, jourfin As Integer
annee = 2009
moisdeb = 4
jourdeb = 20
moisfin = 4
jourfin = 24
dim datedeb as date
datedeb=39923
 
    With Selection.QueryTable
        .Connection = Array(Array( _
        "ODBC;DSN=Remedy;ARServer=remedy.alstom.com;ARServerPort=3111;UID=*****;PWD=*****;ARAuthentication=;ARDiaryDescend=1;ARNameReplac" _
        ), Array("e=1;SERVER=NotTheServer"))
        .CommandText = Array( _
        "SELECT ""ITC:RPT:ReportDataNew"".Status, ""ITC:RPT:ReportDataNew"".""Group+"", ""ITC:RPT:ReportDataNew"".""Requester+"", ""ITC:RPT:ReportDataNew"".Summary, ""ITC:RPT:ReportDataNew"".""Individual+"", ""ITC:RPT:ReportDa" _
        , _
        "taNew"".""Record-Entry-ID"", ""ITC:RPT:ReportDataNew"".""First-Assigned-Time"", ""ITC:RPT:ReportDataNew"".Status" & Chr(13) & "" & Chr(10) & "FROM ""ITC:RPT:ReportDataNew"" ""ITC:RPT:ReportDataNew""" & Chr(13) & "" & Chr(10) & "WHERE (""ITC:RPT:ReportDataNew"".Status_His" _
        , _
        "tory_New_TIME>{ts '" & datedeb & "'} And ""ITC:RPT:ReportDataNew"".Status_History_New_TIME<{ts '39927'}) AND (""ITC:RPT:ReportDataNew"".""Group+""='FR_VBN1_PCSupportVilleurbanne') AND (""IT" _
        , _
        "C:RPT:ReportDataNew"".""Record-Entry-ID"" Like '%HD%')" & Chr(13) & "" & Chr(10) & "ORDER BY ""ITC:RPT:ReportDataNew"".Status, ""ITC:RPT:ReportDataNew"".""Group+""" _
        )
        .Refresh BackgroundQuery:=False
    End With
End Sub

mario_fr · 29 Avril 2009

Re : Excel et requete ODBC avec date

Idem....

La macro s'arrete tjs à la ligne

Code:

.Refresh BackgroundQuery:=False

mario_fr · 29 Avril 2009

Re : Excel et requete ODBC avec date

Ça fonctionne !!!!

Avec la syntaxe suivante :

Code:

Sub Macro1()
Dim datedeb As Variant
Dim datefin As Variant

datedeb = "2009-04-20 00:00:00"
datefin = "2009-04-24 00:00:00"

Je n'ai plus qu'a remplacer les date par des cellules.

Merci à tous pour votre aide.

MJ13 · 29 Avril 2009

Re : Excel et requete ODBC avec date

Re

Et oui, c'est en général en cherchant qu'on trouve. Mais la, c'est l'expérience qui parle.

Bravo Mario (ouf! un problème résolu).

PascalXLD · 30 Avril 2009

Re : Excel et requete ODBC avec date

re

j'en ai plus besoin maintenant mais si jamais je devais le refaire je saurais où chercher

Bravo je n'avais jamais pensé à ta solution

Excel et requete ODBC avec date

mario_fr

XLDnaute Nouveau

Pièces jointes

mario_fr

XLDnaute Nouveau

PascalXLD

XLDnaute Barbatruc

MJ13

XLDnaute Barbatruc

mario_fr

XLDnaute Nouveau

mario_fr

XLDnaute Nouveau

MJ13

XLDnaute Barbatruc

PascalXLD

XLDnaute Barbatruc

Excel et requete ODBC avec date

XLDnaute Nouveau

Pièces jointes

XLDnaute Nouveau

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Nouveau

XLDnaute Nouveau

XLDnaute Barbatruc

XLDnaute Barbatruc

Privacy & Transparency

Privacy & Transparency