Discussion :

[kawaya]

Salut, je cale sur un problème depuis 2 jours, j'ai déjà pas mal fouillé dans le site mais rien n'y fait je n'y arrive pas.

Mon problème: j'ai un sous formulaire, sfmResults qui affiche des informations de différents modules (référence, catégorie et notamment la platform utilisé). Mon but et de filtrer par rapport à la platform.

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
18
19
20
21
 
Public Sub UpdateFilter()
 
    Dim Filter As String
    Filter = "true"
 
        If Not IsNull(Me![cboModulePlatform].Value) Then
            Filter = Filter + " AND [platform] = " + Format$(Me![cboModulePlatform].Value, "#0")
        End If
 
    With Forms!F_ModuleTest.sfmResults.Form
        .Filter = Filter
        .FilterOn = True
    End With
 
End Sub
 
Private Sub cboModulePlatform_AfterUpdate()
UpdateFilter
 
End Sub

J'obtient une erreur d'esecution 3075 qui me dit qu'il y a une erreur de syntaxe ( errueur dans 'true And [platform] = SPPA')

Si quelqu'un pouvait me venir en aide je serais très reconnaissant !

Merci

[zoom61]

Salut,

Tu indiques un format numérique Format$(Me![cboModulePlatform].Value, "#0") et la valeur semble être du texte SPPA.

@+.

[kawaya]

Merci beaucoup. Voila ce que ça donne lorsqu'on utilise des fonctions qu'on comprend à moitier....
SI ça peut aider un jour quelqu'un qui se pose la question j'ai remplacer la ligne par

Code :

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

1
2
 
Filter = Filter + " AND [platform] = ' " + Me![cboModulePlatform].Value+ " ' "