Syntaxe de variable ou constante

Bonsoir,

Je cherche la syntaxe pour pouvoir disposer (sur l'ensemble de l'application) d'une variable nommée par exemple strChemin et correspondant au répertoire donné par CurrentProject.path & "\images\"

Je pensais pouvoir la déclarer dans un module sous :

Code:

---

Public strChemin as string = CurrentProject.path & "\images\"

---

mais cela n'a pas l'air de coller... :cry:

bonsoir,

Attention, en vba, tu ne peux comme en vb.net déclarer et initialiser ta variable en une seule instruction.

Code:

---

Public pstrChemin as string

---

et quelque part au démarrage de l'application par exemple:

Code:

---

pstrChemin= CurrentProject.path & "\images\"

---

Sinon, une autre approche consiste à créer une classe regroupant toutes les propriétés globales de l'application, que tu instancies à la déclaration.

Dans la classe, tu crées u ne variable publique que tu initialise à la création:

Code:

---

1 2 3 4 5 6

Public Chemin as string   Sub class_Initialize() Chemin= CurrentProject.path & "\images\" end sub

---

Tu instancies ta classe en la déclarant dans un module standard...

Code:

---

Public poAppli as New clsApplication

---

Et il ne reste alors qu'à l'utiliser...

Code:

---

sFile = poAppli.Chemin & ...

---

Bonsoir,

Autant pour moi, je viens de m'apercevoir de ma c... :oops:

J'ai rajouté dans un module

Code:

---

1 2 3

Public Function strChemin() as string strChemin = CurrentProject.Path & "\images\" End Function

---

Merci de ton aide...

Citation:

---

Envoyé par Gabout

Merci de ton aide...

---

De rien :lol:

N'oublie pas de cliquer sur :resolu: ;)