VBA - Créer ADODB.Jeu d'enregistrements à partir du contenu d'une feuille de calcul
Je suis en train de travailler sur une application Excel qui interroge une base de données SQL. Les requêtes peuvent prendre du temps à s'exécuter (de 20 à 40 min). Si j'ai manquer codé quelque chose, il peut prendre un certain temps à l'erreur ou à atteindre un point de rupture. Je peux enregistrer les résultats dans une feuille fine, c'est quand je suis en train de travailler avec l'enregistrement définit que les choses peuvent exploser.
Est-il un moyen de charger les données dans un ADODB.Jeu d'enregistrements lorsque je suis de débogage pour ignorer l'interrogation de la base de données (la première fois)?
Aurais-je utiliser quelque chose comme cela?
Requête feuille de calcul Excel dans MS-Access VBA (à l'aide de ADODB jeu d'enregistrements)
Merci pour le commentaire. Espérais un brin de code ou un lien vers un plus explicite exemple. Sans doute, ma question ne demande essentiellement une réponse oui/non. De ma faute. 🙂
OriginalL'auteur robault | 2010-03-20
Vous devez vous connecter pour publier un commentaire.
J'ai dû installer MDAC pour obtenir le msado15.dll et une fois que je l'ai eu, j'ai ajouté une référence à partir de (sur Win7 64 bits):
C:\Program Files (x86)\Common Files\System\ado\msado15.dll
Puis j'ai créé une fonction pour retourner un ADODB.Objet Recordset en passant dans un nom de la feuille qui existe dans le classeur actif. Voici le code pour tout les autres si ils en ont besoin, y compris un Test() Sub pour voir si ça fonctionne:
La feuille Sheet1 de données:
Champ1 Champ2 Champ3
Rouge 1
Bleu B 2
C Vert 3
Ce qui doit être copiée dans la feuille Sheet2:
Rouge 1
Bleu B 2
C Vert 3
C'est me sauver une ÉNORME quantité de temps à partir de l'interrogation par rapport à SQL à chaque fois que je veux faire un changement et de la tester...
--Robert
cmd.State
n'est pas un masque de bits, il suffit d'utilisercmd.State = adStateOpen
Merci! (pour le pointage)
OriginalL'auteur robault
Plus simple serait d'utiliser
rs.Save "filename"
etrs.Open "filename"
pour sérialiser côté client jeux d'enregistrements de fichiers.OriginalL'auteur wqw