Discussion :

[francis60]

Bonjour,

Je souhaiterais appliquer une Requête SQL réalisant la jointure de 2 tableaux (Array)

Code :

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

1
2
Tab1 = Array("a", "b")
Tab2 = Array("1", "2", "3")

a	1
a	2
a	3
b	1
b	2
b	3

Est-ce possible directement en VBA ?

Un détails: chacun de ces 2 tableaux ont été complétés par des recordset d'une connection ADO.

[Pierre Fauconnier]

Salut.

il me semble que le plus simple serait de réaliser la requête cross join sur l'ado.

Sinon, pas de sql sur les tableaux VBA. Tu es donc obligé de passer par un code comme le suivant, en supposant que tes tableaux sont d'indice 0. Sinon, il faut adapter.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub Test()
  Dim a
  Dim b
  Dim i As Long
  Dim j As Long
 
  a = Array("a", "b")
  b = Array(1, 2, 3)
 
  ReDim c(((UBound(a) + 1) * (UBound(b) + 1)) - 1, 1)
  For i = 0 To UBound(c)
    For j = 0 To 1
      c(i, 0) = a(Int(i / (UBound(b) + 1)))
      c(i, 1) = b(i Mod 3)
    Next j
  Next i
End Sub

[Invité]

Bonjour,

Pourquoi faire une jointure de deux tableaux alors que tu peux faire une jointure entre tes deux table via ado!

[francis60]

Bonjour,

il me semble que le plus simple serait de réaliser la requête cross join sur l'ado.

Pourquoi faire une jointure de deux tableaux alors que tu peux faire une jointure entre tes deux table via ado!

Vos 2 réponses se rejoignent, effectivement c'est le bon endroit pour intercaler cette action.

Transférer les recordset champ par champ dans des tableaux et ensuite les balayer avec des boucles imbriquées pour faire des tests et des traitements c'est laborieux alors que SQL offre tout ce qu'il faut...

Mon idée est de lancer les requêtes SQL en cascade pour plus de lisibilité et d'efficacité.
Je trouve pertinent de passer par un objet intermédiaire comme un recordset ou un tableau.
J'ai peu-être surestimé la difficulté de rédaction d'une requête unique qui combinerait l'ensemble des opérations.

Alors oui! dites moi comment faire des requêtes sur plusieurs recordset d'une même connection ADO.

Connection1 > requete1 > Tab1
Connection1( ou 2) > requete2 > Tab2
requete3 sur Tab1 et Tab2 > Résultat

Est-ce possible d'appliquer SQL sur des données provenant de connections ADO différentes ?

[Invité]

il est possible de faire un lien externe entre deux base de donnée différentes!

[francis60]

La réponse à ma demande:

Pas de sql sur les tableaux VBA. Tu es donc obligé de passer par un code.

Donc Discussion résolue.

Guidé par vos remarques, j'ai trouvé une solution plus adaptée à mon besoin ici developpez.com/... .../sousrequetes

Je vais donc faire une Sous-requête (aussi appelé « requête imbriquée » ou « requête en cascade ») qui consiste à exécuter une requête à l’intérieur d’une autre requête.

Merci à vous