Discussion :

[LaPanic]

Bonjour tlm,
j'ai un projet VBA qui contient un userform, du code dans ThisWorkbook et du code dans Feuil1, je voudrais déclarer une variable et l'utiliser partout dans le projet ex:

Code :

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

1
2
3
 
Option Explicit
Const PSWD As String = "LPA"

afin de la récupérer dans

Code :

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

1
2
3
Worksheets(1).Unprotect Password:=PSWD
 
Worksheets(1).Protect Password:=PSWD

la je suis obligé de la déclarer dans: feuil1, thisworkbook et userform
prière de m'aider s'il y a une possibilité de faire une seule déclaration.

Merci pour votre aide

[Invité]

Bonjour

Il faut la déclarer dans un module et écrire Public devant.

Philippe

[LaPanic]

Merci Philippe,
mais quant je declare avec Public je dois mettre la valeur apres

Code :

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

1
2
3
 
Public PSWD As String
PSWD = "LPA"

et la ca ne marche pas."instruction incorrecte à l'extérieur d'une procédure"

[ucfoutu]

Bonsoir,

si ce que tu appelles une "variable" est finalement une constante, sa déclaration se fait ainsi (dans un module) :

Code :

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

Public Const PSWD = "LPA"

Si par contre il s'agit véritablement d'une variable, elle est à déclarer publique dans un module, comme tu l'as fait :

Code :

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

Public PSWD As String

mais la valeur à lui attribuer (et susceptible de modifications) est à définir dans l'évènement de ton choix (dans une procédure, donc) n'importe où (mais dans une procédure appelée ou évènementielle), ainsi (exemple pour lui attribuer la valeur "toto") :

Code :

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

PSWD = "toto"

[LaPanic]

Merci ucfoutu,

oui il s'agit d'une Constante et c'est réglé

Merci