ACCESS

Résolu/Fermé
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 - 21 oct. 2009 à 10:23
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 - 4 nov. 2009 à 16:05
Bonjour,

j'ai un formulaire prêt, avec les identifiants de la table classe,prof,eleve,date et produit.

Dans chaque liste déroulante je choisit l'identifiant mais j'aimerai que se soit le nom qui apparaissent et non l'identifiant(en gros c'est l'identifiant qui sera enregistrer, mais le nom affiché).

https://www.cjoint.com/?kvkxpKhQ4E

49 réponses

nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
23 oct. 2009 à 10:35
J'ai renvoyé !
1
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
21 oct. 2009 à 11:29
Bonjour,

- Première question tu as quoi comme requête sur tes listes déroulantes ?
- Ensuite les liste déroulante peuvent avoir plusieurs colonnes.

Exemple : requête de ma liste déroulante (Select id_eleve, nom_eleve from classe)

- Premier temps je dis a ma liste déroulante que j'ai 2 colonnes, avec comme largeur des colonnes 0cm (mettant mon id_eleve en cacher).

Comme cela j'aurai que les nom des élèves dans mas liste déroulante.

En VBA pour avoir juste l'ID : Me.malistedéroulante.column(0) '0 Correspond à la première valeur de la requete (id_eleve)
En VBA pour le nom : Me.malistedéroulante.column(1) '1 Correspond à la deuxième valeur de la requete (nom_eleve)

J'espère que tu as compris. Sinon je te conseil d'aller faire un tour sur le site Developpez.

Cordialement
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
21 oct. 2009 à 11:33
tkt j'ai compris merci bien
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
21 oct. 2009 à 14:54
et peut on le mettre sous forme de logiciel??? sans tous ce qui a autour ( propriété, barre des taches, barre d'outils)
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
21 oct. 2009 à 14:59
Bien sur ! Voilà le code

a mettre dans un module :)

Option Compare Database

'Dans les propriétés du formulaire (autres) mettre le champ fen indépendante à Oui
'Dans les propriétés du formulaire (événements) mettre sur ouverture : Fenetre_Modale Me
'Dans les propriétés du formulaire (événements) mettre sur fermeture : DoCmd.Quit

    Const SW_HIDE = 0
    Const SW_MAXIMIZE = 3
    Const SW_MINIMIZE = 6
    Const SW_RESTORE = 9
    Const SW_SHOW = 5
    Const SW_SHOWMAXIMIZED = 3
    Const SW_SHOWMINIMIZED = 2
    Const SW_SHOWMINNOACTIVE = 7
    Const SW_SHOWNA = 8
    Const SW_SHOWNOACTIVATE = 4
    Const SW_SHOWNORMAL = 1
  
  Public Declare Function ShowWindow Lib "User32" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long

Function Fenetre_Modale(pForm As Form)
  ShowWindow Application.hWndAccessApp, SW_HIDE
  ShowWindow pForm.hWnd, SW_SHOWNORMAL
  ShowWindow Application.hWndAccessApp, SW_SHOWMINNOACTIVE
End Function


Cordialement
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
22 oct. 2009 à 09:42
merci :D
0
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
22 oct. 2009 à 09:52
De rien ! Penses a mettre le statut résolu ^^
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
22 oct. 2009 à 10:08
oui mais dernière petite question dans ma table prêt j'ai un champ ou je rentre un chiffre qui se soustrait au nombre de produit en stock.

Sauf que quand je clique sur la requête il me soustrait tous mes prêts, alors que je veux que sur celui ou je suis
0
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
22 oct. 2009 à 10:15
Envois ta requete que je regarde :)
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
22 oct. 2009 à 10:18
UPDATE produit INNER JOIN Pret ON produit.ID_prod = Pret.ID_prod SET produit.nb_prod = produit.nb_prod-pret.nb_choisit
WHERE ((pret.ID_prod)=(produit.ID_prod));


merci
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
22 oct. 2009 à 11:06
j'espère que c'est clair ^^
0
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
22 oct. 2009 à 11:11
Ton Where est mal fait !

Ce que je veux dire que dès qu'il trouve ID_prod dans les 2 table il fait la modif ! Du coup il va faire tout tes champs

Il faudrait mettre ID_prod = 'le num de ID en cour'

cordialement
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
22 oct. 2009 à 11:22
comment peut on faire pour qu'il sélectionne justement l'identifiant en cours dans la requête
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
22 oct. 2009 à 11:21
Option Compare Database

'Dans les propriétés du formulaire (autres) mettre le champ fen indépendante à Oui
'Dans les propriétés du formulaire (événements) mettre sur ouverture : Fenetre_Modale Me
'Dans les propriétés du formulaire (événements) mettre sur fermeture : DoCmd.Quit

Const SW_HIDE = 0
Const SW_MAXIMIZE = 3
Const SW_MINIMIZE = 6
Const SW_RESTORE = 9
Const SW_SHOW = 5
Const SW_SHOWMAXIMIZED = 3
Const SW_SHOWMINIMIZED = 2
Const SW_SHOWMINNOACTIVE = 7
Const SW_SHOWNA = 8
Const SW_SHOWNOACTIVATE = 4
Const SW_SHOWNORMAL = 1

Public Declare Function ShowWindow Lib "User32" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long

Function Fenetre_Modale(pForm As Form)
ShowWindow Application.hWndAccessApp, SW_HIDE
ShowWindow pForm.hWnd, SW_SHOWNORMAL
ShowWindow Application.hWndAccessApp, SW_SHOWMINNOACTIVE
End Function


ca je l'ai bien fait je pense, mais j'aimerai qu'il s'ouvre sans le access tous autour, juste quand je clique sur un raccourci, il m'ouvre que la fenêtre

il me dit nom_ambigu : "fenetre_modale" et il arrete
0
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
22 oct. 2009 à 11:51
As tu fais ?

'Dans les propriétés du formulaire (autres) mettre le champ fen indépendante à Oui
'Dans les propriétés du formulaire (événements) mettre sur ouverture : Fenetre_Modale Me
'Dans les propriétés du formulaire (événements) mettre sur fermeture : DoCmd.Quit
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
22 oct. 2009 à 11:51
je fais cela pour tous les formulaires?

et le reste du code je le met ou?
0
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
22 oct. 2009 à 11:53
Pour de se qui est de ta requete je ne vois pas comment tu fais ta modification et comment savoir qu'elle champs tu veux mettre a jour !

Si tu peux m'envoyer ta base, je pourrai regardé, car la je ne vois pas se que tu veux faire :)
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
22 oct. 2009 à 13:29
je te l'ai envoyé sur ton mail de profil


cordialement, mika
0
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
22 oct. 2009 à 11:54
Ton code tu le met dans un module ! Ensuite je ne sais pas comment il réagit s'il y a plusieurs formulaires ! Je fait un test et jte tiens au courant :)
0
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
22 oct. 2009 à 11:59
Pour le formulaire principal tu appliques ca :

'Dans les propriétés du formulaire (autres) mettre le champ fen indépendante à Oui
'Dans les propriétés du formulaire (événements) mettre sur ouverture : Fenetre_Modale Me
'Dans les propriétés du formulaire (événements) mettre sur fermeture : DoCmd.Quit

Pour les autres formulaire tu appliques juste :

'Dans les propriétés du formulaire (autres) mettre le champ fen indépendante à Oui

Cordialement.
0
nirG95 Messages postés 292 Date d'inscription lundi 21 avril 2008 Statut Membre Dernière intervention 15 décembre 2010 32
22 oct. 2009 à 13:59
Désolé, ta base est en version 2007, je suis en 2003 je ne peux pas la regarder :/

Il faut que tu la modifie en version 2003 minimum :)

https://access.developpez.com/access2007/faq/?page=Introduction#AncienneVersion
0
Socra!e Messages postés 443 Date d'inscription lundi 5 octobre 2009 Statut Membre Dernière intervention 6 février 2015 9
22 oct. 2009 à 14:01
j'ai réussi l'autre il me manque juste la requête ^^
0