Discussion :

[SimFaridas]

Bonjour à tous,
Je débute en VB sur excel
je lance une requete sur la base de donné et je souhaite connaitre le nombre de colonne et de ligne
Mais un problème survient qui est : cette opération n'est pas autorisée si l'objet est fermé.

voilà mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
reqSQL = "select username from all_users order by username"
NombreDeColonne=0
NombreDeLigne=0
Set oradynaset = CreateObject("adodb.recordset")
NombreDeColonne = oradynaset.Fields.Count
NombreDeLigne = oradynaset.RecordCount

Le débogage plante sur NombreDeLigne = oradynaset.RecordCount

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
*
reqSQL = "select username from all_users order by username"
NombreDeColonne=0
NombreDeLigne=0
Set oradynaset = Connexion.execute(reqSQL)
If not oradynaset.eof then
    NombreDeColonne = oradynaset.Fields.Count
    oradynaset.MoveLast
   NombreDeLigne = oradynaset.RecordCount
   oradynaset.MoveFirst
End if

[SimFaridas]

Merci de ta réponse
Cette fois l'erreur est objet requis
une idée ?

[Invité]

Montre ton code au complet.

https://www.developpez.net/forums/d1...a/#post9998598