définir une variable pour plusieurs modules

[daniel]

Bonjour le forum,

Si je définis une variable dans un module 1 (en Option Explicit), est-il possible d'y 'faire référence' dans un module 2 ?

Merci de vos réponse

Bon après midi

Daniel

 

[PascalXLD]

Bonjour

Oui si tu la declares public en debut de module

Bonne journée

 

[_Thierry]

Bonjour Daniel, le Forum

Oui c'est tout à fait possible, il suffit pour celà de déclarer ta variable en dehors de toute Procédure, en Haut d'un Module Standard (NB : pas d'un Private Module de Feuille, Classeur, ou UserForm)

Exemple :

Module1
Option Explicit

Public MyPublicString As String

Module2
Option Explicit

Sub MyIniOfPublicString ()
MyPublicString = InputBox('Tapez Votre STring')
TheNextMacro
End Sub


Module3
Option Explicit

Sub TheNextMacro ()
MsgBox = MyPublicString
End Sub


NB : on Pourrait aussi passer la valeur de MyPublicString à l'intérieur d'un Private Module de UserForm (par exemple)

Private Module de UserForm
Private Sub UserForm_Initialize()
Me.Caption = MyPublicString
End Sub

Pour autant que la macro 'MyIniOfPublicString' ait tourné avant le lancement de ce UserForm...

Bon Appétit
@+Thierry

Message édité par: _Thierry, à: 28/02/2005 12:33

 

[merci bcp mais...]

comment déclare t on une variable public ?

Merci !

Daniel

 

[_Thierry]

Tu as la réponse ci-dessus Daniel, on s'est croisé 😉

Bon App
@+Thierry

 

[un grand merci !]

Merci Thierry,

une fois encore, tu as la réponse !!

Bon appétit à toi aussi

Daniel