Bonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour "dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" a écrit dans le message de news:%23Hf%
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour "dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" <misange@devinez-ou.net> a écrit dans le message de news:%23Hf%23gWGIEHA.2924@TK2MSFTNGP09.phx.gbl...
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour "dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" a écrit dans le message de news:%23Hf%
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Denis
Merci de ta réponse mais ça ne correspond pas exactement à ce que je
cherchais à faire. Je peux bien sur simplement définir le range avec des
machin.end(xlright) pour mes données en ligne (c'est du reste ce que
j'ai finalement fait). Mais je suis tout de même surprise de ne pas
pouvoir utiliser une plage nommée coorespondant à un range de type
A2:AR2 alors qu'un range A2:A23 fonctionne très bien.
Tant pis !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mtaBonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et
ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour
"dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" a écrit dans le message de
news:%23Hf%
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Denis
Merci de ta réponse mais ça ne correspond pas exactement à ce que je
cherchais à faire. Je peux bien sur simplement définir le range avec des
machin.end(xlright) pour mes données en ligne (c'est du reste ce que
j'ai finalement fait). Mais je suis tout de même surprise de ne pas
pouvoir utiliser une plage nommée coorespondant à un range de type
A2:AR2 alors qu'un range A2:A23 fonctionne très bien.
Tant pis !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Bonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et
ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour
"dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" <misange@devinez-ou.net> a écrit dans le message de
news:%23Hf%23gWGIEHA.2924@TK2MSFTNGP09.phx.gbl...
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Denis
Merci de ta réponse mais ça ne correspond pas exactement à ce que je
cherchais à faire. Je peux bien sur simplement définir le range avec des
machin.end(xlright) pour mes données en ligne (c'est du reste ce que
j'ai finalement fait). Mais je suis tout de même surprise de ne pas
pouvoir utiliser une plage nommée coorespondant à un range de type
A2:AR2 alors qu'un range A2:A23 fonctionne très bien.
Tant pis !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mtaBonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et
ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour
"dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" a écrit dans le message de
news:%23Hf%
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour "dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" a écrit dans le message de news:%23Hf%
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour "dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" <misange@devinez-ou.net> a écrit dans le message de news:%23Hf%23gWGIEHA.2924@TK2MSFTNGP09.phx.gbl...
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour "dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" a écrit dans le message de news:%23Hf%
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Misange,
Si tu as une plage nommée "Toto" (horizontale)
Me.ComboBox1.List = Application.Transpose(Range("toto"))
Salutations!
"Misange" a écrit dans le message de news:
Bonjour Denis
Merci de ta réponse mais ça ne correspond pas exactement à ce que je
cherchais à faire. Je peux bien sur simplement définir le range avec des
machin.end(xlright) pour mes données en ligne (c'est du reste ce que
j'ai finalement fait). Mais je suis tout de même surprise de ne pas
pouvoir utiliser une plage nommée coorespondant à un range de type
A2:AR2 alors qu'un range A2:A23 fonctionne très bien.
Tant pis !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mtaBonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour "dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" a écrit dans le message de news:%23Hf%
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Misange,
Si tu as une plage nommée "Toto" (horizontale)
Me.ComboBox1.List = Application.Transpose(Range("toto"))
Salutations!
"Misange" <misange@devinez-ou.net> a écrit dans le message de news:OJQhw9KIEHA.828@TK2MSFTNGP12.phx.gbl...
Bonjour Denis
Merci de ta réponse mais ça ne correspond pas exactement à ce que je
cherchais à faire. Je peux bien sur simplement définir le range avec des
machin.end(xlright) pour mes données en ligne (c'est du reste ce que
j'ai finalement fait). Mais je suis tout de même surprise de ne pas
pouvoir utiliser une plage nommée coorespondant à un range de type
A2:AR2 alors qu'un range A2:A23 fonctionne très bien.
Tant pis !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Bonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour "dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" <misange@devinez-ou.net> a écrit dans le message de news:%23Hf%23gWGIEHA.2924@TK2MSFTNGP09.phx.gbl...
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...
Bonjour Misange,
Si tu as une plage nommée "Toto" (horizontale)
Me.ComboBox1.List = Application.Transpose(Range("toto"))
Salutations!
"Misange" a écrit dans le message de news:
Bonjour Denis
Merci de ta réponse mais ça ne correspond pas exactement à ce que je
cherchais à faire. Je peux bien sur simplement définir le range avec des
machin.end(xlright) pour mes données en ligne (c'est du reste ce que
j'ai finalement fait). Mais je suis tout de même surprise de ne pas
pouvoir utiliser une plage nommée coorespondant à un range de type
A2:AR2 alors qu'un range A2:A23 fonctionne très bien.
Tant pis !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mtaBonjour Misange,
Pour les fins de l'exemple, les données se situent en ligne A1:Ax , et ton combobox dans une des feuilles
Pour remplir ton combobox ou listbox tu peux utiliser ceci :
Si tu choisis cet événement "GotFocus", ton combobox sera mis à jour "dynamiquement tout seul"
Le code doit être mis dans la feuille module où l'action se déroule.
'--------------------
Private Sub ComboBox1_GotFocus()
Dim Tblo As Variant
With Worksheets("Feuil1")
Tblo = .Range("A1:IV" & .Cells(1, 256).End(xlToLeft).Column)
.ComboBox1.List = Application.Transpose(Tblo)
End With
End Sub
'--------------------
Salutations!
"Misange" a écrit dans le message de news:%23Hf%
Coucou,
petit test d'abord parce que j'ai posté deux messages hier qui ne sont
jamais apparus ici :-(
je me suis un peu énervée hier à essayer de remplir une rowsource d'une
combobox avec une plage nommée. Je n'y parvenais pas jusqu'à ce que je
réalise que la plage nommée faisait référence à des données en ligne. En
les mettant en colonne, tout a fonctionné normalement. Est-ce que ça
vous parait normal ? Très genant en prime puisque je voulais nommer
cette plage de façon dynamique. Si quelqu'un veut tester...