J'ai dans un UserForm un ComboBox qui affiche une liste de la feuille
"Donnees".
Dans ma feuille Données j'ai désigner ma liste comme ceci afin d'actualiser
en fonction du nombre de données:
Puis dans le UserForm avec la fonction RowSource je spécifie la source de
données:
Combobox1.RowSource = ("Données!Liste")
Je peux donc aller rechercher toutes les données des Colonnes A à P grâce à
exemple:
J'affiche la colonne B dans le textbox1
TextBox1 = ComboBox1.Column(1, ComboBox1.ListIndex)
Jusque là tous fonctionne à merveille mais,
Dans le ComboBox je vois la liste de la Colonne A y à t'il moyen de voir une
autre colonne dans le Combobox ?
Y à t'il donc moyen de répertorier une zone de données de AàP et d'afficher
uniquement la colonne C ?
bonjour Steph, je ne sais pas s'il existe un moyen plus simple de faire ce que tu veux.Néanmoins, pour afficher la 4 ème colonne de ta liste (la numérotation commence à 0), copie ceci --------------------------------------- Private Sub ComboBox1_Click() num = ComboBox1.ListIndex ComboBox1.Text = ComboBox1.List(num, 3) End Sub --------------------------------------- si tu veux avoir tout la ligne (l'ensemble des colonnes) qui s'affiche, copie ceci --------------------------------------- Private Sub ComboBox1_Click() num = ComboBox1.ListIndex For i = 1 To ComboBox1.ColumnCount - 1 ComboBox1.Text = ComboBox1.Text & " " & ComboBox1.List _ (num, i) Next End Sub ---------------------------------------
-----Original Message----- Bonjour,
J'ai dans un UserForm un ComboBox qui affiche une liste de la feuille
"Donnees". Dans ma feuille Données j'ai désigner ma liste comme ceci afin d'actualiser
Puis dans le UserForm avec la fonction RowSource je spécifie la source de
données:
Combobox1.RowSource = ("Données!Liste")
Je peux donc aller rechercher toutes les données des Colonnes A à P grâce à
exemple: J'affiche la colonne B dans le textbox1 TextBox1 = ComboBox1.Column(1, ComboBox1.ListIndex)
Jusque là tous fonctionne à merveille mais,
Dans le ComboBox je vois la liste de la Colonne A y à t'il moyen de voir une
autre colonne dans le Combobox ? Y à t'il donc moyen de répertorier une zone de données de AàP et d'afficher
uniquement la colonne C ?
Merci pour votre aide,
Steph
.
bonjour Steph,
je ne sais pas s'il existe un moyen plus simple de faire
ce que tu veux.Néanmoins, pour afficher la 4 ème colonne
de ta liste (la numérotation commence à 0), copie ceci
---------------------------------------
Private Sub ComboBox1_Click()
num = ComboBox1.ListIndex
ComboBox1.Text = ComboBox1.List(num, 3)
End Sub
---------------------------------------
si tu veux avoir tout la ligne (l'ensemble des colonnes)
qui s'affiche, copie ceci
---------------------------------------
Private Sub ComboBox1_Click()
num = ComboBox1.ListIndex
For i = 1 To ComboBox1.ColumnCount - 1
ComboBox1.Text = ComboBox1.Text & " " & ComboBox1.List _
(num, i)
Next
End Sub
---------------------------------------
-----Original Message-----
Bonjour,
J'ai dans un UserForm un ComboBox qui affiche une liste
de la feuille
"Donnees".
Dans ma feuille Données j'ai désigner ma liste comme
ceci afin d'actualiser
bonjour Steph, je ne sais pas s'il existe un moyen plus simple de faire ce que tu veux.Néanmoins, pour afficher la 4 ème colonne de ta liste (la numérotation commence à 0), copie ceci --------------------------------------- Private Sub ComboBox1_Click() num = ComboBox1.ListIndex ComboBox1.Text = ComboBox1.List(num, 3) End Sub --------------------------------------- si tu veux avoir tout la ligne (l'ensemble des colonnes) qui s'affiche, copie ceci --------------------------------------- Private Sub ComboBox1_Click() num = ComboBox1.ListIndex For i = 1 To ComboBox1.ColumnCount - 1 ComboBox1.Text = ComboBox1.Text & " " & ComboBox1.List _ (num, i) Next End Sub ---------------------------------------
-----Original Message----- Bonjour,
J'ai dans un UserForm un ComboBox qui affiche une liste de la feuille
"Donnees". Dans ma feuille Données j'ai désigner ma liste comme ceci afin d'actualiser
Puis dans le UserForm avec la fonction RowSource je spécifie la source de
données:
Combobox1.RowSource = ("Données!Liste")
Je peux donc aller rechercher toutes les données des Colonnes A à P grâce à
exemple: J'affiche la colonne B dans le textbox1 TextBox1 = ComboBox1.Column(1, ComboBox1.ListIndex)
Jusque là tous fonctionne à merveille mais,
Dans le ComboBox je vois la liste de la Colonne A y à t'il moyen de voir une
autre colonne dans le Combobox ? Y à t'il donc moyen de répertorier une zone de données de AàP et d'afficher
uniquement la colonne C ?
Merci pour votre aide,
Steph
.
Pierre CFI [mvp]
bonjour oui ou ComboBox1.Text = ComboBox1.Column( 3)
-- 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 "verificator" a écrit dans le message de news:0efd01c4deca$30c42ee0$ bonjour Steph, je ne sais pas s'il existe un moyen plus simple de faire ce que tu veux.Néanmoins, pour afficher la 4 ème colonne de ta liste (la numérotation commence à 0), copie ceci --------------------------------------- Private Sub ComboBox1_Click() num = ComboBox1.ListIndex ComboBox1.Text = ComboBox1.List(num, 3) End Sub --------------------------------------- si tu veux avoir tout la ligne (l'ensemble des colonnes) qui s'affiche, copie ceci --------------------------------------- Private Sub ComboBox1_Click() num = ComboBox1.ListIndex For i = 1 To ComboBox1.ColumnCount - 1 ComboBox1.Text = ComboBox1.Text & " " & ComboBox1.List _ (num, i) Next End Sub ---------------------------------------
-----Original Message----- Bonjour,
J'ai dans un UserForm un ComboBox qui affiche une liste de la feuille
"Donnees". Dans ma feuille Données j'ai désigner ma liste comme ceci afin d'actualiser
Puis dans le UserForm avec la fonction RowSource je spécifie la source de
données:
Combobox1.RowSource = ("Données!Liste")
Je peux donc aller rechercher toutes les données des Colonnes A à P grâce à
exemple: J'affiche la colonne B dans le textbox1 TextBox1 = ComboBox1.Column(1, ComboBox1.ListIndex)
Jusque là tous fonctionne à merveille mais,
Dans le ComboBox je vois la liste de la Colonne A y à t'il moyen de voir une
autre colonne dans le Combobox ? Y à t'il donc moyen de répertorier une zone de données de AàP et d'afficher
uniquement la colonne C ?
Merci pour votre aide,
Steph
.
bonjour
oui ou
ComboBox1.Text = ComboBox1.Column( 3)
--
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
"verificator" <verificator@nd.veritas> a écrit dans le message de news:0efd01c4deca$30c42ee0$a401280a@phx.gbl...
bonjour Steph,
je ne sais pas s'il existe un moyen plus simple de faire
ce que tu veux.Néanmoins, pour afficher la 4 ème colonne
de ta liste (la numérotation commence à 0), copie ceci
---------------------------------------
Private Sub ComboBox1_Click()
num = ComboBox1.ListIndex
ComboBox1.Text = ComboBox1.List(num, 3)
End Sub
---------------------------------------
si tu veux avoir tout la ligne (l'ensemble des colonnes)
qui s'affiche, copie ceci
---------------------------------------
Private Sub ComboBox1_Click()
num = ComboBox1.ListIndex
For i = 1 To ComboBox1.ColumnCount - 1
ComboBox1.Text = ComboBox1.Text & " " & ComboBox1.List _
(num, i)
Next
End Sub
---------------------------------------
-----Original Message-----
Bonjour,
J'ai dans un UserForm un ComboBox qui affiche une liste
de la feuille
"Donnees".
Dans ma feuille Données j'ai désigner ma liste comme
ceci afin d'actualiser
bonjour oui ou ComboBox1.Text = ComboBox1.Column( 3)
-- 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 "verificator" a écrit dans le message de news:0efd01c4deca$30c42ee0$ bonjour Steph, je ne sais pas s'il existe un moyen plus simple de faire ce que tu veux.Néanmoins, pour afficher la 4 ème colonne de ta liste (la numérotation commence à 0), copie ceci --------------------------------------- Private Sub ComboBox1_Click() num = ComboBox1.ListIndex ComboBox1.Text = ComboBox1.List(num, 3) End Sub --------------------------------------- si tu veux avoir tout la ligne (l'ensemble des colonnes) qui s'affiche, copie ceci --------------------------------------- Private Sub ComboBox1_Click() num = ComboBox1.ListIndex For i = 1 To ComboBox1.ColumnCount - 1 ComboBox1.Text = ComboBox1.Text & " " & ComboBox1.List _ (num, i) Next End Sub ---------------------------------------
-----Original Message----- Bonjour,
J'ai dans un UserForm un ComboBox qui affiche une liste de la feuille
"Donnees". Dans ma feuille Données j'ai désigner ma liste comme ceci afin d'actualiser