Afficher resultat requete dans msgbox vba [Résolu]

bonbone
Messages postés
14
Date d'inscription
mercredi 11 janvier 2006
Dernière intervention
21 octobre 2007
- 22 janv. 2007 à 12:17 - Dernière réponse : bonbone
Messages postés
14
Date d'inscription
mercredi 11 janvier 2006
Dernière intervention
21 octobre 2007
- 23 janv. 2007 à 09:12
bjr,

je voudrais afficher le resultat d'une requete dans un msgbox en vba

merci de me repondre
Afficher la suite 

Votre réponse

7 réponses

Meilleure réponse
cs_caramelmou
Messages postés
56
Date d'inscription
jeudi 25 décembre 2003
Dernière intervention
23 avril 2008
- 22 janv. 2007 à 15:49
3
Merci
exemple sous Access VBA
Sub test(strSQL as string)
    Dim monrs As New Recordset, cn As Connection, maline As String
    Set cn = CurrentProject.Connection
    monrs.OpenstrSQL,cn, adOpenKeyset
    Do Until monrs.EOF
        For i = 0 To monrs.Fields.Count - 1
            maline = maline & monrs(i).Value & ";"
        Next i
        maline = maline & vbCrLf
        monrs.MoveNext
    Loop
    MsgBox maline
End Sub

Ceci dit s'il y a trop de données ton msgbox ne pourras pas tout afficher

Dr.T

Merci cs_caramelmou 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 95 internautes ce mois-ci

Commenter la réponse de cs_caramelmou
gregcitt
Messages postés
37
Date d'inscription
jeudi 28 septembre 2006
Dernière intervention
18 juin 2007
- 22 janv. 2007 à 13:01
0
Merci
Tu définis ton résultat comme une variable.
Par exemple Resultat=range("A1")

Puis ta msgbox :

MsgBox("Résultat de la requête : " &  Resultat)
Commenter la réponse de gregcitt
jrivet
Messages postés
7401
Date d'inscription
mercredi 23 avril 2003
Dernière intervention
6 avril 2012
- 22 janv. 2007 à 13:10
0
Merci
Salut,

Ou bien directement (pour suivre l'idee de[auteurdetail.aspx?ID=869327 gregcitt] ) Call Msgbox("Résultat de la requête : " &  ActiveSheet.Range("A1").Value)

Si ce n'est pas du tout ce que tu cherches à faire, penses à être un peu plus précis à l'avenir.

@+: Ju£i?n
Pensez: Réponse acceptée
Commenter la réponse de jrivet
jmfmarques
Messages postés
7668
Date d'inscription
samedi 5 novembre 2005
Dernière intervention
22 août 2014
- 22 janv. 2007 à 13:20
0
Merci
Pas clair du tout, même...
Je me demande d'ailleurs s'il ne veut pas tout simplement afficher par msgbox  la phrase de sa requête
Commenter la réponse de jmfmarques
bonbone
Messages postés
14
Date d'inscription
mercredi 11 janvier 2006
Dernière intervention
21 octobre 2007
- 22 janv. 2007 à 14:34
0
Merci
je veux exécuter une requête et voir ce résultat dans un msgbox
Commenter la réponse de bonbone
bonbone
Messages postés
14
Date d'inscription
mercredi 11 janvier 2006
Dernière intervention
21 octobre 2007
- 22 janv. 2007 à 14:46
0
Merci
exemple : vreq="select nom  from TABLE "
exécut cette requete et voir le resultat dans un msgbox

vla
merci
Commenter la réponse de bonbone
bonbone
Messages postés
14
Date d'inscription
mercredi 11 janvier 2006
Dernière intervention
21 octobre 2007
- 23 janv. 2007 à 09:12
0
Merci
merci
Commenter la réponse de bonbone

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.