Userform Initialise : Affecter la valeur d'une cellule variable à un label

[Deb2708]

Bonjour tout le monde,

Je lance un userform à partir d'un doubleclick sur une cellule et j'essaye qu'un label de mon userform reprenne la valeur de la cellule sur laquelle on clique.
J'ai essayé comme ça

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 2 Then
UserFormDonnees.ProjectName = Target.Value
UserFormDonnees.Show
End If
End Sub

Public ProjectName As Variant
Private Sub UserForm_Initialize()
Label2.Caption = ProjectName
End Sub

Mais çà ne fonctionne pas
Je pense que ça doit être simple mais là je cale complètement.
Merci pour votre aide.

 

[Dranreb]

Bonjour.
Le second groupe d'instructions est-il bien dans le module de l'UserForm ?

 

[Deb2708]

Bonjour,
Effectivement ce n'est pas clair ici mais il est bien dans le userform

 

[Dranreb]

Je ne vois rien d'anormal comme ça. Il faudrait que je puisse examiner le classeur.

 

[Deb2708]

ok je fais un classeur anonymisé et je l'envois

 

[jmfmarques]

Bonjour
l'évènement initialize n'est pas garant du chargement complet, au moment où il surgit, des objets du Userform.
Lui préférer l'évènement Activate.

 

[Deb2708]

Bonjour
Désolé pour l'attente.
Voici le classeur vite fait

Je vais regarder Activate
Merci pour le temps accordé

 

[Dranreb]

Je viens d'y penser aussi, pendant que je prenais mon repas.
L'UserForm_Initialize est forcément exécutée juste avant qu'une valeur puisse être affectée à sa propriété ProjectName

 

[Deb2708]

ok ca marche avec Activate
Merci beaucoup pour votre aide