Discussion :

[Mrfreeze117]

Importation3 est bien le nom de mon Userfrom et non pas le libellé. Pourtant quand l'userform s'affiche il ne s’initialise pas et j'arrive pas à trouvé pourquoi.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Importation3_Initialize()
 
If Importation3.Caption = "Sélectionner le Lot à Importer" Then
For i = 2 To 16
ComboBox1.AddItem Sheets(29).Cells(i, 14) 'Ajoute les valeurs des cellules A1 à A4 avec la boucle
Next
 
ElseIf Importation3.Caption = "Sélectionner la vétusté à Importer" Then
 
ElseIf Importation3.Caption = "Sélectionner l'OBS à Importer" Then
 
End If

[deedolith]

Je pense que ca fonctionnera mieux en utilisant la propriété value.
Fait une conversion en chaine si necessaire.

[Philippe Tulliez]

Bonjour,
Quel que soit le nom de ton formulaire (UserForm) la procédure événementielle doit dans être Private Sub UserForm_Initialize()

[Mrfreeze117]

Merci mais comment je précise quel userform je veux initialiser?

[Invité]

bonjour,
tu ne le précise pas Private Sub UserForm_Initialize() est une méthode du Userform tu la décrits dans le code du formulaire en l'occurrence Importation3!

dans ton code tu appels le formulaire et celui-ci exécutera la méthode UserForm_Initialize

Code :

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

Importation3.show

[Philippe Tulliez]

Bonjour,

Merci mais comment je précise quel userform je veux initialiser?

De même que pour les feuilles, les procédures événementielles d'un UserForm font partie intégrante de celui-ci. Tu peux d'ailleurs utiliser le mot clé ME qui est le UserForm lui même.
As-tu au moins essayé de modifier le code ?
A lire Utiliser les UserForm en VBA Excel et tout particulièrement le chapitre IV. Les évènements dans un UserForm

[Mrfreeze117]

Ok merci beaucoup