Bonjour,

j'ai un critère de recherche qui évolue selon les checkBox que je coche (c'est à dire :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
If Nz(Me.chk_hyd, 0) Then
    SQL = SQL & "WHERE [EquipmentTypes]![EquipmentType] = 'HYD'"
End If
 
 
If Nz(Me.chk_el, 0) Then
    If Nz(Me.chk_hyd, 0) Then
    SQL = SQL & "'-EL'"
    Else
    SQL = SQL & "WHERE [EquipmentTypes]![EquipmentType] = 'EL'"
    End If
End If
Mais il faut que ce qu'il y a dans le second membre de l'égalité soit encadré par des ' ' or problème :

Lors du

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
If Nz(Me.chk_el, 0) Then
    If Nz(Me.chk_hyd, 0) Then
    SQL = SQL & "'-EL'"
le second membre est : 'HYD''-EL' ( avec '' = 2 ' collés) et il me faudrait 'HYD-EL'

Donc je pense faire une fonction (parce qu'il n'ya pas que ce cas là, il me faut du générique) ayant pour paramètre la chaine SQL et le truc à ajouter. Cette fonction enleverait le '" de la chaine SQL et le ' du truc à ajouter et les collerait.

Comment faire ça?

Merci