Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
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 06/07/2011, 16h15   #1
Membre du Club
 
Homme Pierrick
Étudiant
Inscription : avril 2011
Messages : 57
Détails du profil
Informations personnelles :
Nom : Homme Pierrick
Localisation : France, Nord (Nord Pas de Calais)

Informations professionnelles :
Activité : Étudiant
Secteur : Industrie

Informations forums :
Inscription : avril 2011
Messages : 57
Points : 45
Points : 45
Par défaut Treeview evenement "clickNode" introuvable

Bonjour à tous, je cherche depuis ce matin à utiliser l'evenement "SurClickNode" d'un treeview placé dans un formulaire. Malheureusement, il n'apparait pas dans les propriétés de mon treeview
Je voudrais récupérer la clé du dernier node selectionné.

Merci de votre aide.
koluche est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 06/07/2011, 16h39   #2
Membre du Club
 
Homme Pierrick
Étudiant
Inscription : avril 2011
Messages : 57
Détails du profil
Informations personnelles :
Nom : Homme Pierrick
Localisation : France, Nord (Nord Pas de Calais)

Informations professionnelles :
Activité : Étudiant
Secteur : Industrie

Informations forums :
Inscription : avril 2011
Messages : 57
Points : 45
Points : 45
Je viens de tomber sur ça:

Citation:
Il existe des événements click ou double-click. Il ne sont pas listés dans les propriétés mais tu peux les atteindre directement depuis l'éditeur VBA.
Je n'y croyais plus!! Je vais de ce pas essayer.

EDIT/ Bon bha ça ne fonctionne pas, une erreur est levée quand je click sur la node, voir même, il ne repère pas le click.
koluche est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 06/07/2011, 20h07   #3
Rédacteur/Modérateur
 
Avatar de Dolphy35
 
Homme Morgan BILLY
Technicien de Production
Inscription : octobre 2004
Messages : 4 103
Détails du profil
Informations personnelles :
Nom : Homme Morgan BILLY
Âge : 33
Localisation : France, Ille et Vilaine (Bretagne)

Informations professionnelles :
Activité : Technicien de Production
Secteur : Industrie

Informations forums :
Inscription : octobre 2004
Messages : 4 103
Points : 8 728
Points : 8 728
Bonjour,



Afficher le contenu d'un noeud dans un sous formulaire

sinon http://access.developpez.com/faq/ind...eeview&x=0&y=0

Dolphy
__________________
Personnaliser la vue Backstage d'Access 2010
Découvrez avec nous Office 2010
Je ne réponds pas aux questions techniques par MP
Dolphy35 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/07/2011, 09h15   #4
Membre du Club
 
Homme Pierrick
Étudiant
Inscription : avril 2011
Messages : 57
Détails du profil
Informations personnelles :
Nom : Homme Pierrick
Localisation : France, Nord (Nord Pas de Calais)

Informations professionnelles :
Activité : Étudiant
Secteur : Industrie

Informations forums :
Inscription : avril 2011
Messages : 57
Points : 45
Points : 45
Bonjour, et merci de la réponse.
J'ai déjà lu ces pages de A à Z, et je dois avouer que ce bout de code adapté a mon besoin. Bref, j'essaie et je reviens pour vous dire quoi!

Code :
1
2
3
4
5
6
7
8
9
10
11
Private Sub TreeView0_NodeClick(ByVal Node As Object)
 
    Dim nodClient As Node
    If Node.Parent Is Nothing Then
        Set nodClient = Node
    Else
        Set nodClient = Node.Parent
    End If
    Me.RecordSource = "SELECT * FROM CLIENTS WHERE [Code Client]=" & Chr(34) & nodClient.Key & Chr(34)
 
End Sub
.
EDIT:
Effectivement, je ne sais pas ou j'avais la tête hier... dans le paté probablement!
Merci beaucoup, désolé de ce poste inutile!!
koluche est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 21h33.


 
 
 
 
Partenaires

Hébergement Web