Discussion :

[Gabout]

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 :

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

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

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

[mout1234]

bonsoir,

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

Code :

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

Public pstrChemin as string

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

Code :

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

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 :

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

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 :

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

Public poAppli as New clsApplication

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

Code :

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

  sFile = poAppli.Chemin  & ...

[Gabout]

Bonsoir,

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

J'ai rajouté dans un module

Code :

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

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

Merci de ton aide...

[mout1234]

Merci de ton aide...

De rien

N'oublie pas de cliquer sur