Discussion :

[iliesss]

Bonjour
j'ai deux tables "Affaire" et "entreprise"
avec deux formulaire "ajouter affaire" et "ajouter entreprise"
dans le formulaire "ajouter affaire" il y a une zone de liste déroulante origine source est la table "entreprise"

lorsque je clic sur cette liste déroulante et je trouve pas l'entreprise alors je clic sur l'étiquette de cette liste déroulante automatiquement le formulaire "ajouter entreprise" s'affiche pour ajouter une nouvelle entreprise.


après la fermeture du formulaire "ajouter entreprise" dans la zone de liste déroulanteje ne trouve pas cette dernière entreprise ajouté donc je suis obliger de fermé le formulaire "ajouter affaire" et l'ouvrir pour trouvé la nouvelle entreprise

SVP est ce qu'il y a une méthode pour éviter la fermeture et l'ouverture de formulaire "ajouter affaire"
Merci beaucoup

[jimbolion]

iliesss,

Tout simplement en faisant un rafraîchissement grâce à la méthode Requery

Code :

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

Me.Mazonedeliste.Requery

Une lecture de cette Faq te permettra de tirer parti de toutes les fonctionnalités d'une liste déroulante :

http://access.developpez.com/faq/?page=zdl

Jimbolion

[ClaudeLELOUP]

Bonjour,

Exploite l'événement Sur fermeture de ton formulaire AjouterEntreprise pour actualiser le contenu de ta zone de liste.
Avant d'actualiser, teste que le formulaire AjouterAffaire est ouvert, sinon tu provoquerais une erreur quand tu t'en sers de manière autonome.

Voici le code :

Code :

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

1
2
3
4
5
Private Sub Form_Close()
  If CurrentProject.AllForms("AjouterAffaire").IsLoaded Then
     Forms!AjouterAffaire!LaZoneDeListeDeAjouterAffaire.Requery
  End If
End Sub

N.B. Evite les espaces, lettres accentuées, caractères spéciaux dans les noms de tes objets et contrôles. Vois le genre de règle que les professionnels recommandent : Descriptif des conventions typographiques du code Visual Basic de Jean-Philippe AMBROSINO.

[iliesss]

merci les amis
demain je vais essayé les réponses
bonne nuit

[ClaudeLELOUP]

Bonjour à Jean-Marie : je viens de constater que nous étions deux sur la balle !

[jimbolion]

Claude,

Ta réponse développe un peu plus l'utilisation de la méthode Requery, ce qui permettra à iliesss d'en découdre plus facilement avec sa problématique.

JimBoLion

[iliesss]

Salut les amis j'ai essayé mais je sais bien que j'ai mal suivre vos conseils en plus j'ai ajouté une autre liste déroulante pour ajouter un surveillant donc en tous j'ai deux listes déroulante
La première pour ajouté une nouvelle entreprise ouvrir formulaire "ajouter entreprise"
La deuxième pour ajouté un nouveau sourveillant ouvrir formulaire "ajouter sourveillant"

Et lorque j'ajoute le code a la fermeture du formulaire "ajouter entreprise" voici le message d'erreur

Merci beaucoup

[jimbolion]

iliesss,

Ça doit être tout confus chez toi la façon de placer tes contrôles donc pour reprendre la pensée de Claude :

Sur l’événement fermeture de ton Formulaire AjouterEntreprise l'actualisation de ta zone est provoquée par cette ligne de code :
Je pense que Claude voulait spécifier LaZoneDeListeDeAjouterEntreprise mais tu auras compris et ré-adapté cette valeur

Code :

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

Forms!AjouterAffaire!LaZoneDeListeDeAjouterAffaire.Requery

Il te suffit d'appliquer la même règle pour ton formulaire ajouter surveillant soit :

Code :

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

1
2
3
4
5
Private Sub Form_Close()
  If CurrentProject.AllForms("AjouterAffaire").IsLoaded Then
     Forms!AjouterAffaire!LaZoneDeListeDeAjouterSurveillant.Requery
  End If
End Sub

Donc en conclusion les deux zones de listes (zone de liste entreprise et zone de liste Surveillant) sont rafraîchies lors de la fermeture de chaque formulaire ajout. Il te faut simplement passer le bon nom du contrôle dans chaque Requery.

JimBoLion

[iliesss]

Salut mes amis
Merci pour vos explications mais désolé j'ai pas pu appliquer ce code
Voici mon fichier access
Aidez moi svp

[jimbolion]

iliesss,

tu regarderas les propriétés sur fermeture de tes formulaires ajouter entreprise et ajouter surveillant

La base ici : sihem_jimbo.rar

Bon courage pour la suite

JimBoLion

[iliesss]

salut
merci pour le code mais lorsque je ferme le formulaire ajouter entreprise ou ajouter surveillant les zones de liste ne contiennent pas le dernier enregistrement ajouter
alors j'ai modifier ton code

Code :

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

1
2
3
4
Private Sub Form_Close()
    On Error Resume Next
    Forms!AjouterAffaire![Nom de l'entreprise].Requery
End Sub

par ce code

Code :

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

1
2
3
4
Private Sub Form_Close()
    On Error Resume Next
    Forms![ajouter affaire].Refresh
End Sub

dans les deux formulaires ajouter entreprise et ajouter surveillant et sa marche très bien
Svp est ce que c'est juste
merci

[jimbolion]

iliesss,

J'avoue ne pas comprendre pourquoi le requery ne fonctionnait pas ayant fait l'essai avant de t'envoyer la mise à jour

Mais puisque le refresh fonctionne, alors c'est parfait

JimBoLion

[iliesss]

Merci pour tout le temps que vous avez donné à moi pour la réponse à ce sujet
Merci les amis