Discussion :

[onejock]

bonjour,
j'aimerais que dans tout mon classeur, je puisse atteindre la valeur de certaines variables...

j'ai donc mis dans thisworkbook :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
Option Explicit
' déclaration des variables communes au classeur
Public ongletTableau2Bord As String
' ...
 
Private Sub Workbook_Open()
 
initvar
End Sub
 
 
Private Sub initvar()
 
' affectation des variables communes au classeur
ongletTableau2Bord = "tableau2Bord"
' ...
End Sub

dans l'espoire d'utiliser ces variables sur les autres feuilles (ainsi je centralise mes variables, c'est pratique pour ne pas galerer en maintenance...)

evidemment dans une feuille quelconque, le code :

Code :

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

1
2
 
MsgBox ongletTableau2Bord

affiche "".

Si c'est pas dans thisworkbook."a l'ouverture du classeur" qui faut mettre ca, c'est ou ? et a quoi sert thisWB dans ce cas?

dernier point quand j'essayes :

Code :

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

 static Public ongletTableau2Bord As String

des que je change de ligne, il me le remplace par

Code :

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

 Public ongletTableau2Bord As String

[wilfried_42]

bonjour


dans un module standard

bonne journée

[onejock]

Merci,
j'ai mis le code

Code :

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

1
2
3
4
5
6
 
' déclaration des variables communes au classeur
Public ongletTableau2Bord As String
Public Sub initvar()
ongletTableau2Bord = "tableau2Bord"
End Sub

dans le module1 crée par defaut par excel et ca marche.

Sinon, je veux bien savoir dans quel cas on utilise thisworkbook ????

[Invité]

Bonjour :

Comme le dit Wilfried_42 il faut mettre la procédure ci-dessous dans un module standard :

Code :

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

1
2
3
4
5
6
Private Sub initvar()
 
' affectation des variables communes au classeur
ongletTableau2Bord = "tableau2Bord"
' ...
End Sub

Mais supprimez "Private" car :

Private Facultatif. Indique que la procédure Sub n'est accessible qu'à d'autres procédures du module dans lequel elle a été déclarée.

[onejock]

merci jj...