Tu dois utiliser un contrôle provenant le la boîte à outils "contrôle".
Et dans la feuille module où l'action se déroule, tu peux copier ce code en adaptant la plage de cellules
'----------------------- Private Sub ComboBox1_GotFocus()
With ComboBox1 .ColumnCount = 2 .ColumnWidths = "50;50" .List = Range("A1:B" & Range("A65536").End(xlUp).Row).Value End With
End Sub '-----------------------
Salutations!
"Jean-Marc Charrier" a écrit dans le message de news: Bonjour,
Avec la barre d'outils formulaire, j'aimerais créer une zone de liste modifiable qui affiche le contenu des deux premières colonnes d'un tableau ?
Est-ce possible ?
Merci pour vos réponses?
JMC
Jean-Marc Charrier
Bonjour,
J'essaye mais ça ne marche pas ???
J'ai créé une zone de liste modifiable sur la feuil1 associée à 2 colonnes (nom et prénom)
Ensuite je fais Alt F11 puis je crée un module ds l'éditeur VBA et je colle votre code. Mais rien ne se passe. Pourtant qd j'affecte une macro à la combobox je peux faire un msgbox (par ex) mais il ne va jamais ds le ComboBox1_GotFocus() ???
Je dois mal faire quelque chose ??
Merci de votre aide JM
"michdenis" a écrit dans le message de news:
Bonjour Jean-Marc,
Tu dois utiliser un contrôle provenant le la boîte à outils "contrôle".
Et dans la feuille module où l'action se déroule, tu peux copier ce code en adaptant la plage de cellules
'----------------------- Private Sub ComboBox1_GotFocus()
With ComboBox1 .ColumnCount = 2 .ColumnWidths = "50;50" .List = Range("A1:B" & Range("A65536").End(xlUp).Row).Value End With
End Sub '-----------------------
Salutations!
"Jean-Marc Charrier" a écrit dans le message de news:
Bonjour,
Avec la barre d'outils formulaire, j'aimerais créer une zone de liste modifiable qui affiche le contenu des deux premières colonnes d'un tableau ?
Est-ce possible ?
Merci pour vos réponses?
JMC
Bonjour,
J'essaye mais ça ne marche pas ???
J'ai créé une zone de liste modifiable sur la feuil1 associée à 2 colonnes
(nom et prénom)
Ensuite je fais Alt F11 puis je crée un module ds l'éditeur VBA et je colle
votre code. Mais rien ne se passe.
Pourtant qd j'affecte une macro à la combobox je peux faire un msgbox (par
ex) mais il ne va jamais ds le ComboBox1_GotFocus() ???
Je dois mal faire quelque chose ??
Merci de votre aide
JM
"michdenis" <michdenis@hotmail.com> a écrit dans le message de
news:et2sqdX3FHA.4076@TK2MSFTNGP15.phx.gbl...
Bonjour Jean-Marc,
Tu dois utiliser un contrôle provenant le la boîte à outils "contrôle".
Et dans la feuille module où l'action se déroule, tu peux copier ce code
en adaptant la plage de cellules
'-----------------------
Private Sub ComboBox1_GotFocus()
With ComboBox1
.ColumnCount = 2
.ColumnWidths = "50;50"
.List = Range("A1:B" & Range("A65536").End(xlUp).Row).Value
End With
End Sub
'-----------------------
Salutations!
"Jean-Marc Charrier" <charrier.jeanmarc@neuf.fr> a écrit dans le message
de news: eXnLaXX3FHA.3136@TK2MSFTNGP09.phx.gbl...
Bonjour,
Avec la barre d'outils formulaire, j'aimerais créer une zone de liste
modifiable qui affiche le contenu des deux premières colonnes d'un tableau
?
J'ai créé une zone de liste modifiable sur la feuil1 associée à 2 colonnes (nom et prénom)
Ensuite je fais Alt F11 puis je crée un module ds l'éditeur VBA et je colle votre code. Mais rien ne se passe. Pourtant qd j'affecte une macro à la combobox je peux faire un msgbox (par ex) mais il ne va jamais ds le ComboBox1_GotFocus() ???
Je dois mal faire quelque chose ??
Merci de votre aide JM
"michdenis" a écrit dans le message de news:
Bonjour Jean-Marc,
Tu dois utiliser un contrôle provenant le la boîte à outils "contrôle".
Et dans la feuille module où l'action se déroule, tu peux copier ce code en adaptant la plage de cellules
'----------------------- Private Sub ComboBox1_GotFocus()
With ComboBox1 .ColumnCount = 2 .ColumnWidths = "50;50" .List = Range("A1:B" & Range("A65536").End(xlUp).Row).Value End With
End Sub '-----------------------
Salutations!
"Jean-Marc Charrier" a écrit dans le message de news:
Bonjour,
Avec la barre d'outils formulaire, j'aimerais créer une zone de liste modifiable qui affiche le contenu des deux premières colonnes d'un tableau ?
Est-ce possible ?
Merci pour vos réponses?
JMC
michdenis
Bonjour Jean-Marc,
Pour utiliser le code proposé dans ce fil, tu ne dois pas renseigner la propriété ListFillRange d'un combobox dans une feuille de calcul ou la propriété RowSource d'un combobox dans un formulaire.
Salutations!
"Jean-Marc Charrier" a écrit dans le message de news: % Bonjour,
J'essaye mais ça ne marche pas ???
J'ai créé une zone de liste modifiable sur la feuil1 associée à 2 colonnes (nom et prénom)
Ensuite je fais Alt F11 puis je crée un module ds l'éditeur VBA et je colle votre code. Mais rien ne se passe. Pourtant qd j'affecte une macro à la combobox je peux faire un msgbox (par ex) mais il ne va jamais ds le ComboBox1_GotFocus() ???
Je dois mal faire quelque chose ??
Merci de votre aide JM
"michdenis" a écrit dans le message de news:
Bonjour Jean-Marc,
Tu dois utiliser un contrôle provenant le la boîte à outils "contrôle".
Et dans la feuille module où l'action se déroule, tu peux copier ce code en adaptant la plage de cellules
'----------------------- Private Sub ComboBox1_GotFocus()
With ComboBox1 .ColumnCount = 2 .ColumnWidths = "50;50" .List = Range("A1:B" & Range("A65536").End(xlUp).Row).Value End With
End Sub '-----------------------
Salutations!
"Jean-Marc Charrier" a écrit dans le message de news:
Bonjour,
Avec la barre d'outils formulaire, j'aimerais créer une zone de liste modifiable qui affiche le contenu des deux premières colonnes d'un tableau ?
Est-ce possible ?
Merci pour vos réponses?
JMC
Bonjour Jean-Marc,
Pour utiliser le code proposé dans ce fil, tu ne dois pas renseigner la propriété ListFillRange d'un combobox dans une feuille de
calcul ou la propriété RowSource d'un combobox dans un formulaire.
Salutations!
"Jean-Marc Charrier" <charrier.jeanmarc@neuf.fr> a écrit dans le message de news: %23KugbRj3FHA.3588@TK2MSFTNGP15.phx.gbl...
Bonjour,
J'essaye mais ça ne marche pas ???
J'ai créé une zone de liste modifiable sur la feuil1 associée à 2 colonnes
(nom et prénom)
Ensuite je fais Alt F11 puis je crée un module ds l'éditeur VBA et je colle
votre code. Mais rien ne se passe.
Pourtant qd j'affecte une macro à la combobox je peux faire un msgbox (par
ex) mais il ne va jamais ds le ComboBox1_GotFocus() ???
Je dois mal faire quelque chose ??
Merci de votre aide
JM
"michdenis" <michdenis@hotmail.com> a écrit dans le message de
news:et2sqdX3FHA.4076@TK2MSFTNGP15.phx.gbl...
Bonjour Jean-Marc,
Tu dois utiliser un contrôle provenant le la boîte à outils "contrôle".
Et dans la feuille module où l'action se déroule, tu peux copier ce code
en adaptant la plage de cellules
'-----------------------
Private Sub ComboBox1_GotFocus()
With ComboBox1
.ColumnCount = 2
.ColumnWidths = "50;50"
.List = Range("A1:B" & Range("A65536").End(xlUp).Row).Value
End With
End Sub
'-----------------------
Salutations!
"Jean-Marc Charrier" <charrier.jeanmarc@neuf.fr> a écrit dans le message
de news: eXnLaXX3FHA.3136@TK2MSFTNGP09.phx.gbl...
Bonjour,
Avec la barre d'outils formulaire, j'aimerais créer une zone de liste
modifiable qui affiche le contenu des deux premières colonnes d'un tableau
?
Pour utiliser le code proposé dans ce fil, tu ne dois pas renseigner la propriété ListFillRange d'un combobox dans une feuille de calcul ou la propriété RowSource d'un combobox dans un formulaire.
Salutations!
"Jean-Marc Charrier" a écrit dans le message de news: % Bonjour,
J'essaye mais ça ne marche pas ???
J'ai créé une zone de liste modifiable sur la feuil1 associée à 2 colonnes (nom et prénom)
Ensuite je fais Alt F11 puis je crée un module ds l'éditeur VBA et je colle votre code. Mais rien ne se passe. Pourtant qd j'affecte une macro à la combobox je peux faire un msgbox (par ex) mais il ne va jamais ds le ComboBox1_GotFocus() ???
Je dois mal faire quelque chose ??
Merci de votre aide JM
"michdenis" a écrit dans le message de news:
Bonjour Jean-Marc,
Tu dois utiliser un contrôle provenant le la boîte à outils "contrôle".
Et dans la feuille module où l'action se déroule, tu peux copier ce code en adaptant la plage de cellules
'----------------------- Private Sub ComboBox1_GotFocus()
With ComboBox1 .ColumnCount = 2 .ColumnWidths = "50;50" .List = Range("A1:B" & Range("A65536").End(xlUp).Row).Value End With
End Sub '-----------------------
Salutations!
"Jean-Marc Charrier" a écrit dans le message de news:
Bonjour,
Avec la barre d'outils formulaire, j'aimerais créer une zone de liste modifiable qui affiche le contenu des deux premières colonnes d'un tableau ?
