[AC-2007] Numérotation de ligne [Résolu]

[El Bosc]

Bonjour,

Je soumet à votre sagacité la petite procédure ci-dessous. Elle à pour fonction de créer un numéro de ligne de livraison lors de la création de ce bordereau.
Cette routine fonctionnait bien mais depuis peu, j' obtient le message suivant: Erreur 2447, utilisation non valide d' un (.),d' un (!) ou de parenthèse.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Private Sub LgnPrt_Enter()
 
    Dim NmLg As String
    Dim Rgt As Recordset
    Dim Bd As Database
 
    Set Bd = CurrentDb
 
    NmLg = "SELECT T_Mvmt.Cf_Prt, (Count(*)+1) AS [Compte De T_Mvmt] "
    NmLg = NmLg & "FROM T_Mvmt "
    NmLg = NmLg & "Where T_Mvmt.Cf_Prt = " & Forms!Sf_PrtLg01!Cf_Prt.Value
    NmLg = NmLg & "GROUP BY T_Mvmt.Cf_Prt;"
 
    Set Rgt = Bd.OpenRecordset(NmLg, dbOpenSnapshot)
 
    If (Rgt.BOF) And (Rgt.EOF) Then
        Forms![Sf_PrtLg01]![LgnPrt] = 1
    Else
        Forms![Sf_PrtLg01]![LgnPrt] = Rgt.Fields![Compte De T_Mvmt].Value
    End If
 
End Sub

La ligne sur laquelle semble buter le système est la ligne"Where".
Quelqu' un pourrait-il m' éclairer ?

Par avance merci

[User]

Salut,

Que contient

Code :

 Forms!Sf_PrtLg01!Cf_Prt.Value

,

Peux-tu donner des exemples de valeurs ?

A+

[El Bosc]

Bonsoir,

En fait, le champ [Cf_Prt] contient une valeur numérique. Ce chiffre correspond à la clé primaire de la table [T_Prt].

A plus

[El Bosc]

Bonjour,

J' ai refais le formulaire et depuis, cette procédure fonctionne.
En fait j' étais passé d' une version Access 97 à 2007. Est-ce la raison de ce plantage, je ne peux l' affirmer avec certitude.

Quelqu' un peut-il me le confirmer?

Bonne soirée