Formulaire d Initialisation avec argument

Bonjour,

Je désire faire passer un argument dans la procédure d'initialisation d un formulaire. (userform1.show)
la définition d'une variable publique dans le programme ne donne aucun résultat. le contenu de la variable est toujours vide dans la procédure .
quelqu'un aurait-il une idée pour ce faire ? :?
Merci.

Bonjour,

Citation:

---

Je désire faire passer un argument dans la procédure d'initialisation d un formulaire. (userform1.show)

---

S'il s'agit d'un UserForm, ajouter une méthode Initialisation(<paramètres>) à la userform.
Puis appeler cette méthode avant le userform1.Show()

Bonjour,
Je n'ai sans doute pas compris ta question parce-que pour moi, une variable définie comme Public garde sa valeur également dans un UserForm.

bonjour,

j'ai déclaré une variable publique dans le coding de mon programme (public dim titre as integer)
titre = 1
userform1.show pointe vers la procédure userform1_Initialize
le trace (debug.print titre), dans cette procédure, donne zéro alors que cette variable était initialisée à 1 (voir ci-dessus)

Bonjour,
Alors, bien que j'étais certain de ce que j'avançais. J'ai fais un test et je confirme Test contient bien 1
Dans Module1

Code:

---

1 2 3 4 5 6

Option Explicit Public titre As Integer Sub Main() titre = 1 UserForm1.Show End Sub

---

Dans UserForm1

Code:

---

1 2 3 4

Option Explicit Private Sub UserForm_Initialize() Me.TextBox1 = titre End Sub

---

Ajout (Edit) : Petite précision
Si évidemment, tu as placé UserForm1.Show depuis le module ThisWorkbook alors tu auras la variable test à 0
Pour ma part, je démarre toujours mes applications dans une procédure Main que je place dans un module principal que je nomme MainXXXX
Donc, code dans ThisWorkBook

Code:

---

1 2 3 4

Option Explicit Private Sub Workbook_Open() Main End Sub

---

Merci pour cette réponse qui situe mon problème !