Discussion :

[Homer091]

Bonjour,

Comem beaucoup j'ai repris le tutoriel de caféine pour la recherche Multi critère. Sauf que j'ai un ptit problème.

A la fin du tuto on peut ouvrir en double cliquant dans la liste le formulaire attacher. J'ai taper le même code que le tuto (en changeant bien sur ce ki devait l'être et il me met "erreur d'éxécution '2501'
donc voici mon code:

Code :

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

1
2
3
4
 
Private Sub lstResults_DblClick(Cancel As Integer)
DoCmd.OpenForm "Consulter", acNormal, , "[Cdepdt] = " & Me.lstResults
End Sub

Où "Consulter est le nom de mon formulaire que je veux ouvrir
et Cdepdt est une des 2 clés primaires de ma table

Can you help me?

[Jean-Philippe André]

Bonjour,
peux tu nous dire ce qui s'affiche lorsque tu lances ceci :

Code :

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

1
2
3
4
5
6
Private Sub lstResults_DblClick(Cancel As Integer)
If Not IsNull(Me.lstResults) Then
    MsgBox Me.lstResults
    DoCmd.OpenForm "Consulter", acNormal, , "[Cdepdt] = " & Me.lstResults
End If
End Sub

Cdepdt est bien un champ numérique ?

[tAKAmAkA]

Il manque un bout...
Tu dois indiquer la colonne de ta liste qui contient la valeur.
Si c'est la première:

Code :

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

DoCmd.OpenForm "frmDocument", acNormal, , "[Docnum] = " & Me.lstResults.Column(0)

[Homer091]

Alors pour jpchek:

Sa m'ouvre une toute petite fenetre qui reprend le numero de mon article
(123456) et ensuite la meme erreur se produit

Et non mon champs "Cdepdt" n'est pas en numeriqque sinon ma recherche multicritere est déffaillante et marche presque plus.

Pk sa après j'en sait rien je suis une bille en SQL


Pour Takamaka: Alors oui sa s'ouvre pas contre il n'y a rien dans mon formulaire tout les champs son vides. j'ai mis en colonne le numero 1 mais à quoi correspond cette colonne stp.

Merci de me répondre les gars sa fait plaisir de vori qu'on peut compter sur des gens comme vous

[Jean-Philippe André]

alors si ton champ est de type texte, il faut mettre des apostrophes dans ta ligne de code :

Code :

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

DoCmd.OpenForm "Consulter", acNormal, , "[Cdepdt] = '" & Me.lstResults & "'"

l'utilisation du column() est pratique si ta colonne liée n'est pas celle qui t'intéresse pour faire ton traitement

[Homer091]

Sa marche j'adore

Enfin sa marche, lol oui mais quand la fenetre s'ouvre elle me met tout les enregistrement du meme code produit.

N'y a t il pas moyen que s'ouvre seulement la ligne que j'ai cliqué?

merci bcp en tous cas j'ai fait un pas en avant grace à vous

[Jean-Philippe André]

il faut passer par ta clé primaire ou alors combiner dans tes critères les colonnes de ta listbox, avec le code de Takamaka