Bonjour à tous,
Je me permet de poster ce message car j’ai besoin d’aide sous VBA.
Je souhaiterai écrire une petite macro qui me permet de récupérer des données sur Excel venant d’une base de donnée SQL. Ma table que j’appellerai « matable » est composé d’une cinquantaine de champ dont une fait référence à la date .J’arrive à me connecter sans problème mais j’ai un souci dans le rapatriement des données. L’objectif de ce petit outils, c’est de récupérer certaines données pour une date données (exemple : 17 sept 2003)
Voici le code de ma requête :
Citation :
Dim ReqSQL As String
ReqSQL = "SELECT Champ_2,champ45 FROM dbo.matable WHERE dbo.matable.date>='20030917' "
|
Pas de faute signaler ici mais est ce que ma requête est rédigé correctement ?
Ensuite je souhaite que le resultat de ma requete s’affiche dans une feuille Excel
Citation :
With ActiveSheet.QueryTables.Add(Connection:=Maconnection, Destination:=Range("A1" ), Sql:= ReqSQL)
.Refresh
End With
|
......
La ca plante :
Citation :
Erreur d'execution '1004'
Erreur definie par l'application ou par l'objet
|
Qui pourrait m'aider,SVP, à resoudre mon problème ?
Ma solution n'est peut être pas la meilleur ! qui en aurrai une autre ?
Merci d'avance à celui ou à ceux qui pourront m'aider !!
Veuillez m'excuser peut etre de mon ignirance mais je suis auto ditacte et donc novice dans cette matiere....
@+ Sir
Message édité par sirshogun le 24-09-2003 à 10:10:39