Discussion :

[Ludwik]

Bonjour à vous tous,

Je me permets de vous solliciter pour le problème suivant:
Dans une IHM j'ai un champ qui possède trois colonnes, je souhaiterai en VBA saisir la valeur de ces trois colonnes que j'ai selectionner. Le problème est que je ne sais pas comment faire, avec Forms(nomFormulaire).controls(colonne) seul la 1er colonne est saisissable pouvez vous m'aider pour pouvoir saisir les deux autres.



En remerciant toutes intentions

[Renardo]

Bonjour

Code :

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

Control.column(1)

[Ludwik]

Bonjour Renardo,

J'ai essayé mais cela ne fonctionne pas ci joint le code d'une saisie des trois colonne d'une multi selection,

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Dim i As Variant
For Each i In Forms(Bd_EquipementTotal).Controls(ChoixEqpt).ItemsSelected
 rst1.AddNew
 rst1![Adresse] = Forms(F_ResaPourProjet).Controls(ChoixAdresse).Column(1).ItemData(i)
 rst1![NumAdresse] = Forms(F_ResaPourProjet).Controls(ChoixAdresse).Column(2).ItemData(i)
 rst1![NumProjet] = Forms(F_ResaPourProjet).Controls(ChoixAdresse).Column(3).ItemData(i)
 
 
 rst1.Update
Next

[Renardo]

Et comme ceci

Code :

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

rst1![Adresse] = Forms![F_ResaPourProjet]![ChoixAdresse].Column(1).ItemData(i)

[Ludwik]

Non Renardo cela ne fonctionne pas.