Bonjour,

Je me demande comment fait-on pour joindre deux champs en VBA comme en SQL.

Voici le code en SQL:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
SELECT DISTINCTROW champ1 &" / " champ2
FROM tbl_tableA
Voici mon code en VBA:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Function ordre(A As String, B As String) As Integer
Dim strSQL As String
strSQL = "SELECT DISTINCTROW champ1, champ2 FROM TableA"
strSQL = strSQL & " ORDER BY  " & A & " " & B
Me!lstSearch.RowSource = strSQL
Me!lstSearch.Requery
End Function
Il veut créer le même résultat avec la troisième ligne soit "SELECT DISTINCTROW champ1, champ2 FROM TableA".

Est-ce que vous pouvez m'aider au niveau de la syntaxe à utiliser ?

Merci,
egg3774