Discussion :

[juan67]

Bonjour,

J'ai écrit en VBA le code permettant l'ouverture d'un formulaire lié à la ligne selectionné de ma zone liste qui est le suivant :

Private Sub lstResult_DblClick(Cancel As Integer)
DoCmd.OpenForm "FormulaireMaintenance", acNormal, , "[ID_BRUKER] =" & Me.lstResult
End Sub

Malheureusement j'ai l'erreur : erreur de syntaxe (opérateur absent) dans l'expression << [ID_BRUKER] = >>

[RobiPMS]

Bonjour.
Et comme ceci?

Code :

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

1
2
3
Private Sub lstResult_DblClick(Cancel As Integer)
DoCmd.OpenForm "FormulaireMaintenance", acNormal, , "ID_BRUKER = '" & Me.lstResult & '"'
End Sub

Cordialement.

[juan67]

Ton code reste rouge donc j'ai changé la fin comme ceci :

Code :

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

1
2
3
Private Sub lstResult_DblClick(Cancel As Integer)
DoCmd.OpenForm "FormulaireMaintenance", acNormal, , "ID_BRUKER = '" & Me.lstResult & "'"
End Sub

Mais ne marche toujours pas...

[RobiPMS]

Désolé pour l'erreur : trop vite tapé!

Mais ne marche toujours pas...

Il y a un message d'erreur, ou bien le formulaire s'ouvre "vide"?

Chez moi cette syntaxe fonctionne sans problème avec une zone de liste à une seule colonne. S'il y a plus d'une colonne, il faut faire référence à celle où se trouve l'info sur laquelle on cherche la correspondance

Code :

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

'" & Me!lstResult.Column(1) & "'"

Attention à la numérotation qui commence à 0 pour la première colonne.
Sinon, je ne vois pas dans ce que tu communiques où peut être le problème...

[juan67]

Oui il y a plusieurs colonne dans ma zone de liste et le formulaire à ouvrir par contre contient encore plus d'informations.Le message d'erreur est toujours le même.

Enfaite je m'explique : J'ai mis en place un formulaire de recherche multicritère qui donnent des résultats et donc en selectionnant la "machine" voulu par un double click cela devrait ouvrir le formulaire correspondant avec toutes les informations lié à cette machine .

En pièce jointe j'ai mis mon formulaire de recherche ainsi que la fiche d'information de la machine.

Cette base de donnée permettra l'utilisation d'une gestion de maintenance.


EDIT : Je viens d'essayer ta proposition et il me dit " type de données incompatible dans l'expression du critère"

[juan67]

Une aide ?

[RobiPMS]

Autant pour moi!
Le champ sur lequel tu filtres est de type numérique. Donc la syntaxe doit être :

Code :

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

DoCmd.OpenForm "FormulaireMaintenance", acNormal, , "ID_BRUKER =" & Me!lstResult.Column(3)

avec, bien sûr le bon numéro de colonne : je ne sais pas si c'est 3 ou 4 dans ton cas : il peut y avoir une colonne de taille 0 pas visible.
J'espère que cette fois, ça ira!

[juan67]

Ca marche nickel !

Je te remercie !

par contre dernière chose : comment faire ouvrir mon formulaire en mode fenetre dialogue. Cela permet de mieux refermer.

[RobiPMS]

Content d'avoir pu aider!
Pour ouvrir en mode fenêtre dialogue :

Code :

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

DoCmd.OpenForm "FormulaireMaintenance", acNormal, , "ID_BRUKER =" & Me!lstResult.Column(x), , acDialog

Cdlt.
Ps : pense à taguer "Résolu". Merci.