Discussion :

[Cantalou]

Bonjour à tous,

j'ai lu dans le forum, un fil qui m'interpelle ...

http://www.developpez.net/forums/sho...eur+2147352567

j'aimerai utiliser ça pour mettre à jour le champ "pluie_efficace" de mon formulaire à partir de la liste de choix des communes (COMMUNE_INSEE) sachant que la pluie efficace se trouve dans la table des communes.

Ma liste de choix se base sur une requête SQL qui appelle la table commune:
(voir l'image)


avec colonne liée = 1 et largeurs des 4 colonnes = 0;2;3;0



j'ai donc écrit ceci:

Code :

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

1
2
3
4
 
Private Sub COMMUNE_INSEE_AfterUpdate()
Me.Pluie_efficace = Me.COMMUNE_INSEE.Column(4)
End Sub

Mais visiblement la mise à jour du champ "Pluie_efficace" ne fonctionne pas car il reste toujours vierge.

Pouvez-vous m'expliquer ce qui cloche?

merci !

[@rkane]

je suppose que ta liste deroulante s'appelle COMMUNE_INSEE, donc

Code :

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

1
2
3
4
 
Private Sub AfterUpdate_COMMUNE_INSEE()
me.Pluie_Efficace.value = me.Commune_Insee.column(4)
end sub

sachant que la numerotation des colonnes commence à 0... reconsidere peut-etre le numero de column().
Envoie une version test de ton fichier si ça ne marche pas.

[Cantalou]

Grand MERCI @rkane !!!!

le problème venait effectivement que je ne savais pas que la numérotation des colonnes commence à 0 !

Le bon code est donc :

Code :

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

1
2
3
4
 
Private Sub COMMUNE_INSEE_AfterUpdate()
Me.Pluie_efficace = Me.COMMUNE_INSEE.Column(3)
End Sub

Ces trois lignes vont me permettre de me passer de plusieurs requêtes SQL et de simplifier et raccourcir considérablement mon code et donc débugger pas mal de chose sur lesquelles je butte depuis plusieurs jours !