Discussion :

[bastien]

Bonjour,
J'ai parcouru le forum et pourtant il y a quelquechose que je n'ai pas saisi

Ceci n'est qu'une simple application pour comprendre les variables et leur déclaration.
Sur la feuille Feuil1, je lie un bouton à la macro test() suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Public a As Integer
 
Sub test()
    UserForm1.Show
    Range("A1").Value = a
End Sub

et j'ai créé une classe userform1 qui contient que le bouton CommandButton1:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub CommandButton1_Click()
    a = 10
    Me.Hide
End Sub

Donc on clique sur le bouton de la feuille et on change la valeur de a dans la cellule A1
Mais non...

Pourquoi ?

Merci

[SfJ5Rpw8]

Bonsoir,

tu n'as bien déclaré ta variable une seule fois dans ton projet ?

Pense à rajouter en haut de toutes tes page de code la ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Option Explicit

qui permet de révéler (en autre) les erreurs de portées..
(ce qui semble être ton problème)

[parmi]

Bonjour,

La première partie est dans le code de la Feuil1 ou dans un module ?
Pour que ta variable soit reconnue partout, elle doit être déclarée dans un module...

[bastien]

merci pour vos réponses.

En effet, je l'avais déclaré dans Feuil1 et non dans un module.
Je viens de rectifier mon erreur ! merci bien.

Mais néanmoins, je ne comprends pas pourquoi cela ne fonctionnait pas car finalement, tout était relié !

[Invité]

Bonsoir,

Essaie comme ceci,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Public a As Integer
 
Sub test()
    UserForm2.Show
    Range("A1").Value = a
End Sub

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub CommandButton1_Click()
    Feuil1.a = 10
    Me.Hide
End Sub

En spécifiant Feuil1.