bonjour à tous,
voilà mon pb, dans mon fichier excel j'ai plusieurs feuilles excel. chaque
feuille contient un petit prog VBA . Comme chaque prog utilise des fonctions
identiques, j'ai réalisé une fonction commune que j'ai stocké dans un module
(module 1).
Mon problème se situe au niveau d'une variable qui est utilisée par tous ces
programmes et que je n'arrive pas à définir pour qu'elle soit connue de tous
(du module, des feuilles, voire des forms).
Tous simplement en la déclarant comme étant publique :
Public NomDeTaVaraiable As TRonTypeDeVariable
Exemple : Public Texte As String Sub test() Texte = "Hello World" UserForm1.Show End Sub
Et dans le code du UserForm1
Private Sub UserForm_Activate() MsgBox Texte End Sub
Bonne soirée,
N.
gérard
salut tu la declare dans le module public mavariable as integer par exemple a+ "Xavier POWAGA" a écrit dans le message de news: 4436af66$0$7087$
bonjour à tous, voilà mon pb, dans mon fichier excel j'ai plusieurs feuilles excel. chaque feuille contient un petit prog VBA . Comme chaque prog utilise des fonctions identiques, j'ai réalisé une fonction commune que j'ai stocké dans un module (module 1). Mon problème se situe au niveau d'une variable qui est utilisée par tous ces programmes et que je n'arrive pas à définir pour qu'elle soit connue de tous (du module, des feuilles, voire des forms).
Comment faut-il faire
merci
salut
tu la declare dans le module
public mavariable as integer par exemple
a+
"Xavier POWAGA" <xavierpowaga@free.fr> a écrit dans le message de news:
4436af66$0$7087$626a54ce@news.free.fr...
bonjour à tous,
voilà mon pb, dans mon fichier excel j'ai plusieurs feuilles excel. chaque
feuille contient un petit prog VBA . Comme chaque prog utilise des
fonctions identiques, j'ai réalisé une fonction commune que j'ai stocké
dans un module (module 1).
Mon problème se situe au niveau d'une variable qui est utilisée par tous
ces programmes et que je n'arrive pas à définir pour qu'elle soit connue
de tous (du module, des feuilles, voire des forms).
salut tu la declare dans le module public mavariable as integer par exemple a+ "Xavier POWAGA" a écrit dans le message de news: 4436af66$0$7087$
bonjour à tous, voilà mon pb, dans mon fichier excel j'ai plusieurs feuilles excel. chaque feuille contient un petit prog VBA . Comme chaque prog utilise des fonctions identiques, j'ai réalisé une fonction commune que j'ai stocké dans un module (module 1). Mon problème se situe au niveau d'une variable qui est utilisée par tous ces programmes et que je n'arrive pas à définir pour qu'elle soit connue de tous (du module, des feuilles, voire des forms).
Comment faut-il faire
merci
Xavier POWAGA
j'avais fait cela mais ça ne marchait pas. Par contre en lisant la réponse de gérard j'ai compris qu'effectivement ta réponse marche si elle est mise dans le module.
merci
"Norvi" a écrit dans le message de news:
Bonjour,
Tous simplement en la déclarant comme étant publique :
Public NomDeTaVaraiable As TRonTypeDeVariable
Exemple : Public Texte As String Sub test() Texte = "Hello World" UserForm1.Show End Sub
Et dans le code du UserForm1
Private Sub UserForm_Activate() MsgBox Texte End Sub
Bonne soirée,
N.
j'avais fait cela mais ça ne marchait pas. Par contre en lisant la réponse
de gérard j'ai compris qu'effectivement ta réponse marche si elle est mise
dans le module.
merci
"Norvi" <norvitruoc@gmail.com> a écrit dans le message de news:
1144435964.714352.66190@i40g2000cwc.googlegroups.com...
Bonjour,
Tous simplement en la déclarant comme étant publique :
Public NomDeTaVaraiable As TRonTypeDeVariable
Exemple :
Public Texte As String
Sub test()
Texte = "Hello World"
UserForm1.Show
End Sub
Et dans le code du UserForm1
Private Sub UserForm_Activate()
MsgBox Texte
End Sub
j'avais fait cela mais ça ne marchait pas. Par contre en lisant la réponse de gérard j'ai compris qu'effectivement ta réponse marche si elle est mise dans le module.
merci
"Norvi" a écrit dans le message de news:
Bonjour,
Tous simplement en la déclarant comme étant publique :
Public NomDeTaVaraiable As TRonTypeDeVariable
Exemple : Public Texte As String Sub test() Texte = "Hello World" UserForm1.Show End Sub
Et dans le code du UserForm1
Private Sub UserForm_Activate() MsgBox Texte End Sub