Discussion :

[jijie]

Bonjour,

je voudrais attribuer une source à une listbox mais pas toujours sur la même feuille et ceci en donnant le nom de la feuille sur un combobox. j'ai essayer pas mal de solution, mais je ne trouve pas!!

voila mon code:

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub ComboBox4_Change()
  Sheets(ComboBox4).Select
 
 
ListBox1.ColumnCount = 5
ListBox1.RowSource = "a2: e1500"
 
 
End Sub

merci du renseignement!!

[jfontaine]

essais comme ca

Code :

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

1
2
3
 
 
ListBox1.RowSource = ComboBox4.text & "!a2: e1500"

[jijie]

il me donne le message suivant:

erreur d'execution '13'
incompatibilité de type

il faut bien l'installer dans le combox4?

[fred65200]

bonjour

et avec des apostrophes s'il y a des espaces

Code :

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

1
2
ListBox1.RowSource = "'" & ComboBox4.text & "'!a2: e1500"

cordialement

[laloune]

il ne faut pas la convertir avec Cstr() normalement ? A moins que l'on m'aurait menti...

par contre pour "convertir avec Cstr() "? La je suis perdu?

autant pour moi, j'avais pas réfléchi (ou trop vite), les deux chaînes sont même type, donc nul besoin, a priori, d'en changer le Type

[jfontaine]

je viens juste de le remarquer, mais peut être qu'il y a un espace de trop

Code :

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

1
2
3
4
 
a2:e1500
plutot que 
a2: e1500