L'ajout d'un "order by" fait que DoCmd.GoToRecord fonctionne mal
Bonjour,
j'ai une liste déroulante qui ajoute son contenu dans une table temporaire qui s'affiche dans le détail. Elle fonctionne bien.
Je change la requête de cette liste déroulante (nommée "cboCtrlAajouter")
Code:
SELECT sys_controle.CTL_DESCRIPTION FROM sys_controle;
par
Code:
SELECT sys_controle.CTL_DESCRIPTION FROM sys_controle ORDER BY sys_controle.CTL_DESCRIPTION;
en y ajoutant un order by car c'est nettement plus pratique.
Et là, ça ne fonctionne plus. 8O
La ligne ajoutée contient "#Supprimé". Dans la table temporaire il y a bien une ligne créée mais elle est vide.
Le code associé à la liste déroulante est le suivant :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
| Private Sub cboCtrlAajouter_Change()
Me.Section("Détail").visible = True
Me.AllowAdditions = True
DoCmd.GoToRecord acDataForm, Me.Name, acNewRec
Me.txtControle.Value = Me.cboCtrlAajouter.Column(0)
Me.cboBloquant.Value = "NONBLOQUANT"
Me.cboRestitution.Value = "Aucun"
Me.txtOrdre.Value = iOrdreAuto
iOrdreAuto = iOrdreAuto + 1
Me.Refresh
Me.AllowAdditions = False
End Sub |
Toutes les valeurs affectées par cette méthode sont vides et "#Supprimé" est affiché à la place.
