Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > IHM
IHM Ce forum est dédié aux questions relatives à la création de formulaires et d'états, avec ou sans code VBA, et macros.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 29/11/2011, 12h56   #1
Candidat au titre de Membre du Club
 
Homme alain
Inscription : juillet 2011
Messages : 32
Détails du profil
Informations personnelles :
Nom : Homme alain
Localisation : France, Vaucluse (Provence Alpes Côte d'Azur)

Informations forums :
Inscription : juillet 2011
Messages : 32
Points : 10
Points : 10
Par défaut feuille de donnée et case option

Bonjour,
j'ai créer un formulaire avec un sous formulaire. J'alimente le sous formulaire avec une requete et je l'affiche sous forme d'une feuille de donnée.
Dans les données affichées par le sous formulaire j'ai des case à cocher "oui/non".
lorsque je modifie une de ces cases je veux récupérer la ligne ou le N° de l'enregistrement concerné( ou l'un des champs sur la meme ligne). Comment faire? ....
alain136 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 29/11/2011, 18h09   #2
Rédacteur

 
Avatar de ClaudeLELOUP
 
Homme Claude LELOUP
Chercheur de loisirs (ayant trouvé !)
Inscription : novembre 2006
Messages : 5 242
Détails du profil
Informations personnelles :
Nom : Homme Claude LELOUP
Âge : 66
Localisation : Belgique

Informations professionnelles :
Activité : Chercheur de loisirs (ayant trouvé !)
Secteur : Finance

Informations forums :
Inscription : novembre 2006
Messages : 5 242
Points : 11 040
Points : 11 040
Bonjour Alain,

Si ton formulaire principal s’appelle « LeFormulaire » ;
ton sous-formulaire « NOM_SOUS_FORMULAIRE » ;
la case à cocher « A_Cocher » ;
le contrôle visé « A_Recuperer » ;

voici un code qui affichera la contenu du champ visé lorsque la case est cochée.

Code :
1
2
3
4
5
Private Sub A_Cocher_AfterUpdate()
If Me.A_Cocher = -1 Then
     MsgBox Forms!LeFormulaire!NOM_SOUS_FORMULAIRE.Form!A_Recuperer
End If
End Sub
ClaudeLELOUP est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 00h26.


 
 
 
 
Partenaires

Hébergement Web