Discussion :

[dashara]

Bonjour,

Tout d'abord merci pour tout le contenu de ce forum qui m'aide vraiment beaucoup.

Contexte:
Je me remet doucement à la programmation et donc je suis en train de faire un petit projet pour établir une pseudo BdD sur Excel. L'idée est de créer un fichier de suivi d'offre commercial, d'améliorer l'ensemble avec un tableau de bord ( qui aspirera des donnés de facturation et de livraison extraite d'autre logiciel )et des fonction d'édition avec des modèles word et enfin partager l'ensemble sur google drive. En gros ma boite à outils commercial complète.

Mon problème:
J'utilise des userform pour remplir ma base. La première me demande si je veux ajouter ou modifier. La seconde pour ajouter les coordonnées et autre info de base. Et une troisieme pour modifier ( en cours).Ca tourne bien mais mes combobox reste désespérément vide. Je pense avoir rater une propriété, en faite j'en sais rien mais je voie que ca. Donc la je bloque.

Code :

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

1
2
3
4
5
6
7
Private Sub Creation_Initialize()
 
     Me.Combobox1.AddItem ("Phoning")
     Me.Combobox1.AddItem ("Mailing")
     Me.Combobox1.AddItem ("Salon")
 
End Sub

Meric de votre aide.

[Philippe Tulliez]

Bonjour,
Lorsque j'utilise un contrôle ListBox ou ComboBox, j'utilise la propriété RowSource. Plus simple et plus souple à utiliser que la méthode AddItem que je n'utiiise que dans le cas où la liste ne représente pas toutes les lignes de la liste de "base de données".
Cette propriété permet d'avoir le nom des étiquettes de colonnes affichée

[Invité]

je ne connais pas cette méthode!

Code :

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

1
2
3
4
5
6
7
 Private Sub Creation_Initialize()
 
     Me.Combobox1.AddItem ("Phoning")
     Me.Combobox1.AddItem ("Mailing")
     Me.Combobox1.AddItem ("Salon")
 
End Sub

Code :

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

1
2
3
4
5
6
7
 Private Sub UserForm_Initialize()
 
     Me.Combobox1.AddItem ("Phoning")
     Me.Combobox1.AddItem ("Mailing")
     Me.Combobox1.AddItem ("Salon")
 
End Sub

[dashara]

Merci Philippe,
j'ai effectivement pu contourner le problème grâce à l'utilisation de Rowsource et un onglet supplémentaire. Mais je sais toujours par le pourquoi ( ca m'ennuie quand meme, j'aime bien comprendre).

@rdurupt,
Il me semble que c'est le moyen bourrin de base.

[Philippe Tulliez]

Bonjour,
Comme te l'a écrit Robert, c'est UserForm_Initialize et pas Creation_Initialize

[Invité]

@rdurupt,
Il me semble que c'est le moyen bourrin de base.

ça mérite -1

[dashara]

@ Philippe,
@ Rdurupt,

Désolé, j'ai oublié de le renommer dans mon post

Creation est le nom de ma Userform

[Invité]

je me suis un peut emprté l'hors de mon dernier poste (erreur d'interprétation sans doute) je retire mon -1