Déclaration et utilisation des objets en vba

Bonjour à tous,

J'ai vu dans certains tuto ce genre de déclaration:

Code:

---

1 2 3 4

Dim oRst as DAO.Recordset Dim oDb as DAO.Database Set oDb=CurrentDb Set oRst=oDb.OpenRecordset(...)

---

ou la même sous excel:

Code:

---

1 2 3 4 5

Dim Xl As Excel.Application Dim Classeur As Excel.Workbook Set Xl = New Excel.Application Set Classeur = Xl.Workbooks.Open(...)

---

alors qu'il est possible de faire directement

Code:

---

1 2	Dim oRst as DAO.Recordset Set oRst=CurrentDb.OpenRecordset(...)

---

Ou gérer directement les cellules d'un fichier excel via l'objet Excel.Application

Du coup ma question: pourquoi passer par plusieurs objets ainsi quand l'objet application lui-même permet de le faire? C'est plus rapide? Celà suit les régles de programmation?
Si vous pouviez m'éclairer ça serait super. Merci

Bonjour,

Sans avoir vu les tutoriels en question, c'est difficile de donner LA réponse.

Quand on est dans VBA excel et que l'on veut travailler avec un fichier Excel, il est préférable d'utiliser les objets Excel quand ils existent.

Ceci étant dit, VBA permet d'utiliser les objets d'une autre application Office (ou d'autres compagnies qui ont une license de MS pour implanter VBA dans leurs produits (exemple CATIA ou AUTOCAD)) avec Excel ou d'utiliser Excel avec une autre application Office. C'est typique de cet exemple que tu as donné:

Code:

---

1 2 3 4

Dim Xl As Excel.Application Dim Classeur As Excel.Workbook Set Xl = New Excel.Application Set Classeur = Xl.Workbooks.Open(...)

---

Cela pourrait être, par exemple Word (PowerPoint. Access etc) qui ouvre Excel, pour récupérer disons, un tableau ou un graphique dans un classeur Excel. Théoriquement une instance d'Excel, pourrait ouvrir une autre instance d'Excel de la même façon. Mais, cela n'a pas d'intérêt, ou presque; parce que l'on peut ouvrir et manipuler plusieurs classeurs Excel dans une seule instance d'Excel.

De même que l'on peut ouvrir, par exemple, une application Word (PowerPoint. Access etc) à partir d'Excel

Code:

---

1 2 3 4

Dim Wd As Word.Application Dim Document As Word.document Set Wd= New Word.Application Set Document = wd.documents.Open(...)

---

Ton premier exemple est typique d'une application qui n'a pas d'objet Recordset, comme Word par exemple qui utiliserait des données provenant d'un classeur Excel ou d'une base Access

Code:

---

1 2 3 4

Dim oRst as DAO.Recordset Dim oDb as DAO.Database Set oDb=CurrentDb Set oRst=oDb.OpenRecordset(...)

---

On peut aussi faire comme dans ta troisième hypothèse. Tout cela dépend du programme utilisé et des besoins.

En résumé, directement c'est mieux. Le pilotage c'est utile quand on ne peut pas faire autrement,