Déclarer comme constante le contenu d'une cellule

Bonjour à nouveau (désolé si je créer autant de sujets...)

J'aimerais déclarer une constante qui s'appellerait chemin_dossier

J'ai donc fait ceci en haut d'un module :

Const chemin_dossier As String = Sheets("chemins").Range("B3").Value

Mais j'obtiens le message : Erreur de compilation, constante requise

Merci

Bonsoir,

effectivement, tu ne peux pas déclarer de cette manière....

Cependant, si, comme je l'ai compris, tu as le chemin d'un répertoire dans une cellule, tu nommes cette cellule comme ceci :

Sélectionne ta cellule

Insertion/Nom/Définir

comme nom, tu mets essai, par exemple

En bas, tu auras : Se réfère à : =chemins!$B$3

Puis tu déclares ta constante comme ceci :

Const chemin_dossier As String = "essai"

Pour appeler ta constante, tu fais comme ceci (exemple)

x = Range(chemin_dossier).Value

Merci felix pour ta précision, c'est ce que je voulais !!

Seulement, il faudra à chaque fois que je veux utiliser ma constante, que j'inscrire au début de chaque procédure :

x = Range(chemin_dossier).Value

C'est bien ça ?

Bonsoir,

tu peux aussi déclarer x en public, dans le haut du module

Public x As String

par exemple

Ainsi, si tes macros sont imbriquées, tu n'as qu'à mettre une seule fois cette ligne dans le premier code

Ouaip, c'est exactement ce que j'avais fait

Seulement après, dans chaque macro je suis obligé de déclarer cela :

dossier_factu = Range(dossier_facturation).Value
dossier_technicien = Range(feuilles_technicien).Value
nom_dagence = Range(nom_agence).Value
nom_dagenceg = VBA.UCase(nom_dagence)

Je ne vois pas comment rendre cela "Public"

Merci.

Petit up