Lecture de tables SQL signifie habituellement qu’il y a un besoin de traitement de l’information supplémentaire et manipulation avant les conclusions et les renseignements fournis à la personne de la prise de décision. Excel est la meilleure application pour répondre à ce besoin et certains rapports très utiles et ergonomiques peuvent être développés afin de fournir des informations exactes et frais.

À l’aide de la connexion à sql server définie dans le post précédent, requêtes aux tables de base de données peuvent être effectuées d’une manière très simple. La même technique peut servir pour se connecter à tous les types de bases de données, il suffit de changer le pilote SQL dans la définition de la connexion.

Définir la variable ADODB pour stocker des données de requête

Considérer le « r », défini comme « Dim r As New ADODB. Recordset » la variable où les données de la requête seront stockées après l’exécution de l’enquête de la base de données.  Maintenant, vous pouvez utiliser la formule pour exécuter la requête comme tihis :

r.Open « Select * de Table Where ID > 1 », ThisWorkbook.Con

Naviguer à l’intérieur de la variable de requête lire à partir de SQL

Tout ce que vous devez faire après que la requête a été exécutée navigue d’une ligne à l’autre à l’intérieur de la variable objet ADODB. Disons que vous avez besoin afficher le contenu du formulaire champ ID la table dans la première ligne d’un classeur Excel.

J’ai = 3

Tout en r.EOF pas

Sheet(1).Cells(i,1)=r("ID")

i = i + 1

r.MoveNext
Wend
r.Close

La variable ADODB agit comme un tableau de lignes et doit à traiter ligne par ligne dans une boucle, la navigation en avant déployés par la commande MoveNext et l’indicateur EOF devient TRUE si la fin du tableau est atteinte.