Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Erreur chargement combobox

  • Initiateur de la discussion Initiateur de la discussion sevy1
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

sevy1

XLDnaute Occasionnel
Bonjour à tous et BONNE ET HEUREUSE ANNEE 2015
J'ai un problème je veux créer une combobox qui prend ses données à partir de la feuille 1. j'ai écris ce bout de code
Code:
Private Sub UserForm_Initialize()
Dim derligne, tablo As Long
With Feuil1
derligne = .Range("A" & Rows.Count).End(xlUp).Row
tablo = .Range("A2:A" & derligne)
ComboBox1.List = tablo
End With
End Sub
en exécutant j'ai un message d'erreur incompatibilité de type.
pouvez vous me dire ou se trouve mon erreur?
Merci d'avance
 

Pièces jointes

Re : Erreur chargement combobox

Bonjour,
Autre solution :
Code:
Private Sub UserForm_Initialize()
Dim derligne, tablo()
With Feuil1
derligne = .Range("A" & Rows.Count).End(xlUp).Row
tablo = Range("A2:A" & derligne)
ComboBox1.List = tablo
End With
End Sub
A+
 
Re : Erreur chargement combobox

Bonjour
Merci ça marche. Juste pour mieux comprendre avec mon premier code quand je défini derligne et tablo de type variant ça marche comment expliquer celà
 
Re : Erreur chargement combobox

re tous 🙂🙂🙂
c'est la declaration du tablo pas bonne toujours un variant ou string
donc

dim tablo as variant
ou dim tablo()

ou dim tablo simplement

oups j'avais pas vu ta reponse Pierrot 🙂🙂🙂
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
9
Affichages
326
Réponses
10
Affichages
633
Réponses
3
Affichages
310
  • Question Question
Microsoft 365 Erreur UBound
Réponses
4
Affichages
271
Réponses
5
Affichages
391
Réponses
5
Affichages
839
  • Question Question
Microsoft 365 Export données
Réponses
4
Affichages
880
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…