Discussion :

[Lantenac]

Bonjour !

Je reviens avec le même problème, ou presque.

Ca se passe dans le formulaire "ReportingAdh"

J'aimerais :
- qu'en appuyant sur le bouton "ReportingAdh"
- l'état "ReportingAdh" s'affiche
- en filtrant selon ce qui est mis dans le menu déroulant "MenuDeroulant"

MAIS, quand j'appuie, ça ouvre une fenêtre me demandant l'abréviation au lieu de prendre ce qui est dans le menu déroulant.

Voici ce qui est dans le menu déroulant :
SELECT Consultants.Abréviation FROM Consultants ORDER BY [Abréviation];

- L'Etat "ReportingAdh" va chercher les infos dans la table "Adherents".
- Dans cette table il y a un champs menu déroulant alimenté par la table "Consultants"


Voici le VBA du bouton "ReportingAdh":

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub ReportingAdh_Click()
On Error GoTo Err_ReportingAdh_Click
 
    DoCmd.OpenReport "ReportingAdh", acPreview, "", "[Abréviation]='" & Me.MenuDeroulant.Value & "'"
 
Exit_ReportingAdh_Click:
    Exit Sub
 
Err_ReportingAdh_Click:
    MsgBox Err.Description
    Resume Exit_ReportingAdh_Click
 
End Sub

Que faire svp ?

Merci !

(NB : si je tape l'abréviation dans la fenêtre, le filtre fonctionne)

[LE VIEUX]

bonjour,
à controler
dans un menu déroulant ce n'est pas forcément ce qui est affiché qui est selectionné, par exemple s'il y a plusieurs colonnes avec souvent une cachée (clé primaire) il faut voir la colonne liée et préciser dans le code celle qui doit être saisie

ex :

Code :

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

 Me.MenuDeroulant.Column(x)

la numérotation commence à 0

[Lantenac]

Bonjour le Vieux,

Merci d'essayer de m'aider.

Mon menu déroulant ne contient qu'une colonne. ("Abréviation" étant nécessairement unique, c'est elle la clef primaire de la table "Consultant")

Voici ce qui est dans le menu déroulant :
SELECT Consultants.Abréviation FROM Consultants ORDER BY [Abréviation];

J'ai toutefois essayé, en mettant .Column(0) à la place de .Value, ça ne change rien.

Il continue à me demander dans une fenêtre l'abréviation. Le coquin !

Avez-vous besoin d'autres infos pour m'aider à déterminer d'où vient l'erreur ?
(Je suis novice)

Merci.

[LE VIEUX]

bonjour,
en debug que donne la valeur de

Code :

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

Me.MenuDeroulant.Value

[fgiambelluco]

Bonjour
Désolé de mimisser dans votre conversation.
Mais si Access demande une valeur de paramètre, c'est peut être que tout simplement [Abréviation] n'est pas dans la source de données de l'état.

Il faudrait vérifier la clause Where de l'ouverture de l'état. et la source de données de l'état.

On ne sait jamais !

[LE VIEUX]

bonjour,
salut fgiambelluco

Désolé de mimisser dans votre conversation

tu n'as pas a être désolé bien au contraire toutes les avis sont à tester,
d'autant que tu as probablement raison si access ne trouve pas [abréviation] c'est a priori que soit il n'existe pas soit qu'il est mal orthographié.