Portée d'un UserForm

[Charlesbruno]

Bonjour,

Je voulais savoir si on peut modifier, depuis un classeur1, les propriétés des labels d' un UserForm appartenant à un classeur 2 ?
Je précise que les 2 classeurs sont ouverts, et que l'UserForm est déjà affcihé avant de lancer une macro du classeur1, et c'est à l'intérieur de cette dernière que je veux aller modifier les labels !!

Merci d'avance

 

[GeoTrouvePas]

Re : Portée d'un UserForm

Bonsoir,

A mon humble avis, oui ! ça ne me paraît pas poser de problème.

 

[Charlesbruno]

Re : Portée d'un UserForm

merci de ta réponse, j'attendais aussi un peu d'aide sur le code...

 

[job75]

Re : Portée d'un UserForm

Bonsoir,

Un exemple de procédures.

1) Dans le fichier Classeur2.xls, cette macro dans This Workbook :

Private Sub Workbook_Open() 
UserForm1.Show 0 'ouverture en non modal
End Sub

Et dans le Module1 de ce même fichier :

Sub AfficherMasquerLabel()
With UserForm1.Label1
  .Visible = Not .Visible
End With
End Sub

2) Dans le fichier Classeur1.xls, cette macro dans son Module1 :

Sub LanceMacroFichier()
On Error Resume Next 'si le fichier n'est pas ouvert...
Application.Run "Classeur2.xls!Module1.AfficherMasquerLabel"
End Sub

On peut lancer cette dernière macro comme on veut.

A+

 

[Charlesbruno]

Re : Portée d'un UserForm

Bonjour,

Je te remercie, ça marche nickel...