Passage de la valeur d'une variable d'un formulaire à un autre en VBARésolu

Question

Bonjour j'ai une variable X d&#233;finie dans le formulaire 1 j'aimerais passer sa valeur au formulaire 2, pourriez vous me dire comment faire? merci

L'esprit n'a comme limite que celle que nous lui fixons. 

Le bonheur est tel le papillon, on croit l'attraper... il s'envole...

jrivet · Accepted Answer

Salut,
 en suivant le modele de jpleroisse.

Private MaVar as string

Public Sub PasseValeur(LaVar as string)
MaVar = LaVar
end sub

Public Function RecupereVar() As String
RecupereVar = MaVar
End Fucntion

Tu Passes la valeur en appelent PasseValeur depuis l'un des forms, et tu la recupere depuis le Form2 avec: 
RecupereValeur.

Exemple,
Dans Form1:

Dim Var as string
Var = "TOTO"
Call PasseValeur(Var)
__________

Dans Form2

Dim Var as string
Var = RecupereVar
MsgBox Var

_________

Voila j espere que ca peut t'aider
@+
Julien

jpleroisse · Answer

Bonjour,

'Tu places ta variable dans un module et tu la d&#233;clare Public.

'Exemple(dans le module)

Public MaVar As String



'Dans un CommandButton sur un formulaire o&#249; l'autre

Private Sub CommandButton1_Click()

 MaVar = "Bonjour"

MsgBox MaVar

End Sub



jpleroisse



Si une r&#233;ponse vous convient, cliquez R&#233;ponse Accept&#233;e.

Muramasa · Answer

J'ai d&#233;j&#224; essay&#233; cette solution mais la valeur de la variable d&#233;finie dans le formulaire 1 ne l'est pas dans le formulaire 2. :(

L'esprit n'a comme limite que celle que nous lui fixons. 

Le bonheur est tel le papillon, on croit l'attraper... il s'envole...

jpleroisse · Answer

Re,

'Essaye ceci,

'Toujours dans un module



Sub Test()

Dim MaVar As String

    MaVar = "Boujour"

    MsgBox MaVar

End Sub



'Ensuite dans n'importe quel formulaire.



Private Sub CommandButton1_Click()

Call Test

End Sub



 jpleroisse

 

 Si une r&#233;ponse vous convient, cliquez R&#233;ponse Accept&#233;e.

Muramasa · Answer

Merci ton petite astuce marche bien mais comment je fais pour passer une valeur venant du formulaire vers le module? 

L'esprit n'a comme limite que celle que nous lui fixons. 

Le bonheur est tel le papillon, on croit l'attraper... il s'envole...

Passage de la valeur d'une variable d'un formulaire à un autre en VBA

5 réponses

Discussions similaires