OVH Cloud OVH Cloud

VBA (Zone liste multicol.)

4 réponses
Avatar
Moh
Bonjour,

le code suivant:

Private Sub Code_eleve1_Change()
Me.NomEleve = Me.Code_eleve1.Column(1)
Me.PrenomEleve = Me.Code_eleve1.Column(2)
End Sub

(NomEleve et PrenomEleve sont des zones de texte; Code
eleve1 est une zone de liste modifiable multicolonnes)

declenche l'erreur suivante:
erreur d'execution 438: propriete ou methode non geree par
cet objet

Quelle est la solution?
Merci beaucoup pour votre aide.

4 réponses

Avatar
Ghislain
SAlut,
Personnellement je n aurais pas fait 2 colomnes:
Me.code_eleve1=Me.NomEleve &" "& Me.PrenomEleve


-----Message d'origine-----
Bonjour,

le code suivant:

Private Sub Code_eleve1_Change()
Me.NomEleve = Me.Code_eleve1.Column(1)
Me.PrenomEleve = Me.Code_eleve1.Column(2)
End Sub

(NomEleve et PrenomEleve sont des zones de texte; Code
eleve1 est une zone de liste modifiable multicolonnes)

declenche l'erreur suivante:
erreur d'execution 438: propriete ou methode non geree
par

cet objet

Quelle est la solution?
Merci beaucoup pour votre aide.
.



Avatar
Patrice
Bonjour,
Private Sub Code_eleve1_Change()
Me!NomEleve = Me!Code_eleve1.Column(1)
Me!PrenomEleve = Me!Code_eleve1.Column(2)
End Sub
Remplace les points par !




Bonjour,

le code suivant:

Private Sub Code_eleve1_Change()
Me.NomEleve = Me.Code_eleve1.Column(1)
Me.PrenomEleve = Me.Code_eleve1.Column(2)
End Sub

(NomEleve et PrenomEleve sont des zones de texte; Code
eleve1 est une zone de liste modifiable multicolonnes)

declenche l'erreur suivante:
erreur d'execution 438: propriete ou methode non geree par
cet objet

Quelle est la solution?
Merci beaucoup pour votre aide.



Avatar
Salut,
la zone de liste code_eleve1 est alimenté par une requete
et non pas par les zones de texte et comporte une 3 eme
colonne.
j'affiche ensuite le nom et prenom de l'eleve selectionné
par l'utilisateur.

-----Message d'origine-----
SAlut,
Personnellement je n aurais pas fait 2 colomnes:
Me.code_eleve1=Me.NomEleve &" "& Me.PrenomEleve


-----Message d'origine-----
Bonjour,

le code suivant:

Private Sub Code_eleve1_Change()
Me.NomEleve = Me.Code_eleve1.Column(1)
Me.PrenomEleve = Me.Code_eleve1.Column(2)
End Sub

(NomEleve et PrenomEleve sont des zones de texte; Code
eleve1 est une zone de liste modifiable multicolonnes)

declenche l'erreur suivante:
erreur d'execution 438: propriete ou methode non geree
par

cet objet

Quelle est la solution?
Merci beaucoup pour votre aide.
.

.





Avatar
Pierre CFI [mvp]
bonjour
j'aurai mis sur afterupdate au lieu de change
méfie toi, la colonne 1 est column(0)

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Moh" a écrit dans le message de news:7bf701c4d09d$326d4000$
Bonjour,

le code suivant:

Private Sub Code_eleve1_Change()
Me.NomEleve = Me.Code_eleve1.Column(1)
Me.PrenomEleve = Me.Code_eleve1.Column(2)
End Sub

(NomEleve et PrenomEleve sont des zones de texte; Code
eleve1 est une zone de liste modifiable multicolonnes)

declenche l'erreur suivante:
erreur d'execution 438: propriete ou methode non geree par
cet objet

Quelle est la solution?
Merci beaucoup pour votre aide.