Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Zone de liste et ajout ds sous-formulaire ..

11 réponses
Avatar
Sylvie182
Bonjour à tous,

Ds un formulaire Société, g un sous-formulaire qui affiche les employés de
la sté. J'aimerais à partir d'1 zone de liste (affichant un ensemble de
personnes) faire un double-clic sur un des éléments de la liste pour ajouter
la personne aux employés du sous-formulaire.
Pensez-vous que cela soit possible ? Si oui pouvez-vous m'indiquer la
technique à utiliser ?
Merci de votre aide.
Sylvie

10 réponses

1 2
Avatar
Gafish
Sylvie182 wrote:
Bonjour à tous,


Bonjour,

Ds un formulaire Société, g un sous-formulaire qui affiche les
employés de la sté. J'aimerais à partir d'1 zone de liste (affichant
un ensemble de personnes) faire un double-clic sur un des éléments de
la liste pour ajouter la personne aux employés du sous-formulaire.
Pensez-vous que cela soit possible ? Si oui pouvez-vous m'indiquer la
technique à utiliser ?


J'imagine que ton sous form est basée sur une table, ou une requete.
Il faut donc qu'au double clic, tu fasses un INSERT dans la table concernée
avec ce code (pour l'insert à toi de complèter et d'adapter) :

CurrentDb.Execute "INSERT INTO [LaTable] (Champ1) VALUES (" & Me.lst & ");"

Il te suffit ensuite de mettre à jour ton sous form :

Me.NomDuSousForm.Requery


Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Sylvie182
Je pense donc qu'il faut que j'insère ds ma table (Affectations,qui fait le
lien entre Sociétés et Personnes), la réfPersonne et la réfSociété ; et que
j'actualise mon sous-form (Employés). Bien, mais la réfSociété se trouve sur
le form principal, la réfPersonne ds la 1ère colonne cachée de ma zone de
liste. Est-il possible d'avoir un coup de main pour personnaliser ma
procédure ?

Voici ce que j'ai comme code ds ma procédure qui évidemment ne marche pas
encore telle quel :

Private Sub Liste21_DblClick(Cancel As Integer)
CurrentDb.Execute "INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,
RéfPersonne ) VALUES (" & Me.Liste21 & ");"
End Sub

Mille merci de votre aide !!
----------------------------------

Sylvie182 wrote:
Bonjour à tous,


Bonjour,

Ds un formulaire Société, g un sous-formulaire qui affiche les
employés de la sté. J'aimerais à partir d'1 zone de liste (affichant
un ensemble de personnes) faire un double-clic sur un des éléments de
la liste pour ajouter la personne aux employés du sous-formulaire.
Pensez-vous que cela soit possible ? Si oui pouvez-vous m'indiquer la
technique à utiliser ?


J'imagine que ton sous form est basée sur une table, ou une requete.
Il faut donc qu'au double clic, tu fasses un INSERT dans la table concernée
avec ce code (pour l'insert à toi de complèter et d'adapter) :

CurrentDb.Execute "INSERT INTO [LaTable] (Champ1) VALUES (" & Me.lst & ");"

Il te suffit ensuite de mettre à jour ton sous form :

Me.NomDuSousForm.Requery


Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






Avatar
Eric
Bonsoir Sylvie,

Je pense que ton Insert doit être du genre :
"INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,RéfPersonne )
VALUES (" & Me.Parent![RéfSociété] & "," & Me.Liste21 & ")"

RéfSociété est ici considéré comme un champ numérique, si ce n'est pas
le cas :
VALUES ('" & Me.Parent![RéfSociété] & "'," & Me.Liste21 & ")"

Le controle Liste21 est dans le sous-formulaire.


Je pense donc qu'il faut que j'insère ds ma table (Affectations,qui fait le
lien entre Sociétés et Personnes), la réfPersonne et la réfSociété ; et que
j'actualise mon sous-form (Employés). Bien, mais la réfSociété se trouve sur
le form principal, la réfPersonne ds la 1ère colonne cachée de ma zone de
liste. Est-il possible d'avoir un coup de main pour personnaliser ma
procédure ?

Voici ce que j'ai comme code ds ma procédure qui évidemment ne marche pas
encore telle quel :

Private Sub Liste21_DblClick(Cancel As Integer)
CurrentDb.Execute "INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,
RéfPersonne ) VALUES (" & Me.Liste21 & ");"
End Sub

Mille merci de votre aide !!
----------------------------------


Sylvie182 wrote:

Bonjour à tous,


Bonjour,


Ds un formulaire Société, g un sous-formulaire qui affiche les
employés de la sté. J'aimerais à partir d'1 zone de liste (affichant
un ensemble de personnes) faire un double-clic sur un des éléments de
la liste pour ajouter la personne aux employés du sous-formulaire.
Pensez-vous que cela soit possible ? Si oui pouvez-vous m'indiquer la
technique à utiliser ?


J'imagine que ton sous form est basée sur une table, ou une requete.
Il faut donc qu'au double clic, tu fasses un INSERT dans la table concernée
avec ce code (pour l'insert à toi de complèter et d'adapter) :

CurrentDb.Execute "INSERT INTO [LaTable] (Champ1) VALUES (" & Me.lst & ");"

Il te suffit ensuite de mettre à jour ton sous form :

Me.NomDuSousForm.Requery


Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr



Avatar
Sylvie182
Super, j'essaie tout de suite!
Merci
Bonne fin de soirée.


Bonsoir Sylvie,

Je pense que ton Insert doit être du genre :
"INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,RéfPersonne )
VALUES (" & Me.Parent![RéfSociété] & "," & Me.Liste21 & ")"

RéfSociété est ici considéré comme un champ numérique, si ce n'est pas
le cas :
VALUES ('" & Me.Parent![RéfSociété] & "'," & Me.Liste21 & ")"

Le controle Liste21 est dans le sous-formulaire.


Je pense donc qu'il faut que j'insère ds ma table (Affectations,qui fait le
lien entre Sociétés et Personnes), la réfPersonne et la réfSociété ; et que
j'actualise mon sous-form (Employés). Bien, mais la réfSociété se trouve sur
le form principal, la réfPersonne ds la 1ère colonne cachée de ma zone de
liste. Est-il possible d'avoir un coup de main pour personnaliser ma
procédure ?

Voici ce que j'ai comme code ds ma procédure qui évidemment ne marche pas
encore telle quel :

Private Sub Liste21_DblClick(Cancel As Integer)
CurrentDb.Execute "INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,
RéfPersonne ) VALUES (" & Me.Liste21 & ");"
End Sub

Mille merci de votre aide !!
----------------------------------


Sylvie182 wrote:

Bonjour à tous,


Bonjour,


Ds un formulaire Société, g un sous-formulaire qui affiche les
employés de la sté. J'aimerais à partir d'1 zone de liste (affichant
un ensemble de personnes) faire un double-clic sur un des éléments de
la liste pour ajouter la personne aux employés du sous-formulaire.
Pensez-vous que cela soit possible ? Si oui pouvez-vous m'indiquer la
technique à utiliser ?


J'imagine que ton sous form est basée sur une table, ou une requete.
Il faut donc qu'au double clic, tu fasses un INSERT dans la table concernée
avec ce code (pour l'insert à toi de complèter et d'adapter) :

CurrentDb.Execute "INSERT INTO [LaTable] (Champ1) VALUES (" & Me.lst & ");"

Il te suffit ensuite de mettre à jour ton sous form :

Me.NomDuSousForm.Requery


Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






Avatar
Sylvie182
Ah non ma zone de liste est ds le formulaire principal ..


Super, j'essaie tout de suite!
Merci
Bonne fin de soirée.


Bonsoir Sylvie,

Je pense que ton Insert doit être du genre :
"INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,RéfPersonne )
VALUES (" & Me.Parent![RéfSociété] & "," & Me.Liste21 & ")"

RéfSociété est ici considéré comme un champ numérique, si ce n'est pas
le cas :
VALUES ('" & Me.Parent![RéfSociété] & "'," & Me.Liste21 & ")"

Le controle Liste21 est dans le sous-formulaire.


Je pense donc qu'il faut que j'insère ds ma table (Affectations,qui fait le
lien entre Sociétés et Personnes), la réfPersonne et la réfSociété ; et que
j'actualise mon sous-form (Employés). Bien, mais la réfSociété se trouve sur
le form principal, la réfPersonne ds la 1ère colonne cachée de ma zone de
liste. Est-il possible d'avoir un coup de main pour personnaliser ma
procédure ?

Voici ce que j'ai comme code ds ma procédure qui évidemment ne marche pas
encore telle quel :

Private Sub Liste21_DblClick(Cancel As Integer)
CurrentDb.Execute "INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,
RéfPersonne ) VALUES (" & Me.Liste21 & ");"
End Sub

Mille merci de votre aide !!
----------------------------------


Sylvie182 wrote:

Bonjour à tous,


Bonjour,


Ds un formulaire Société, g un sous-formulaire qui affiche les
employés de la sté. J'aimerais à partir d'1 zone de liste (affichant
un ensemble de personnes) faire un double-clic sur un des éléments de
la liste pour ajouter la personne aux employés du sous-formulaire.
Pensez-vous que cela soit possible ? Si oui pouvez-vous m'indiquer la
technique à utiliser ?


J'imagine que ton sous form est basée sur une table, ou une requete.
Il faut donc qu'au double clic, tu fasses un INSERT dans la table concernée
avec ce code (pour l'insert à toi de complèter et d'adapter) :

CurrentDb.Execute "INSERT INTO [LaTable] (Champ1) VALUES (" & Me.lst & ");"

Il te suffit ensuite de mettre à jour ton sous form :

Me.NomDuSousForm.Requery


Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr








Avatar
Eric
re,
Je crois que j'ai mal saisi l'organisation Form+Sous-Form et surtout où
se trouve la Liste21.
Donc, en fonction de ça, la réponse précédente est erronnée.
Si la liste21 est dans le formulaire principal :
"INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,RéfPersonne )
VALUES (" & Me![RéfSociété] & "," & Me.Liste21 & ")"

--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Avatar
Eric
voir la correction apportée au même moment ;-)

Ah non ma zone de liste est ds le formulaire principal ..

--

A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Sylvie182
G un message qui me dit "erreur de compilation: fin d'instruction attendu" et
le nom table est en surbrillance ..


re,
Je crois que j'ai mal saisi l'organisation Form+Sous-Form et surtout où
se trouve la Liste21.
Donc, en fonction de ça, la réponse précédente est erronnée.
Si la liste21 est dans le formulaire principal :
"INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,RéfPersonne )
VALUES (" & Me![RéfSociété] & "," & Me.Liste21 & ")"

--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr



Avatar
Sylvie182
Le message c'est maintenant : attendu n°ligne,étiquette,instruction ou fin
instruction" ..! Tout à l'air bien écrit pourtant ?! ... :-(

Private Sub Liste21_DblClick(Cancel As Integer)
"INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,RéfPersonne ) VALUES
(" & Me![RéfSociété] & "," & Me.Liste21 & ")"
End Sub





re,
Je crois que j'ai mal saisi l'organisation Form+Sous-Form et surtout où
se trouve la Liste21.
Donc, en fonction de ça, la réponse précédente est erronnée.
Si la liste21 est dans le formulaire principal :
"INSERT INTO [Affectations-Personnes/Stés] ( RéfSociété,RéfPersonne )
VALUES (" & Me![RéfSociété] & "," & Me.Liste21 & ")"

--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr



Avatar
Eric
re,
tu as bien mis le sql sur une seule ligne ? Pasde retour à la ligne
après ( RéfSociété,RéfPersonne)
sinon fait ceci pour définir ton sql

Dim strSQL As String
strSQL = "INSERT INTO [Affectations-Personnes/Stés] " _
& "( RéfSociété,RéfPersonne ) " _
& " VALUES (" & Me![RéfSociété] _
& "," & Me.Liste21 & ")"

CurrentDb.Execute strSQL


G un message qui me dit "erreur de compilation: fin d'instruction attendu" et
le nom table est en surbrillance ..




--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

1 2