declaration constante range

bonjour

je voudrais déclarer comme constante dans un classeur la valeur d'une cellule (représentant le chemin réseau des docs partagés)

pourquoi

Code:

---

Public const CheminReso as string = sheets("A").range("A10").value

---

est-il incorrect ?

j'ai essayé en nommant la plage, pas mieux!

merci par avance pour vos explications

salut
dans :

Code:

---

Public const CheminReso as string = sheets("A").range("A10").value

---

Range("A10").Value est une variable. Elle ne peut donc déterminer la valeur d'une constante.

Tu peux par contre utiliser une variable publique CheminReso ainsi :

Code:

---

Public CheminReso as string ' Public si dans un module standard, sinon Private

---

et :
1) à l'ouverture :

Code:

---

CheminReso = range("A10"').value

---

2) dans l'évènement Change de ta feuille :

Code:

---

1 2 3

Private Sub Worksheet_Change(ByVal Target As Range) If Target = Range("A10") Then CheminReso = Target.Value End Sub

---

Bonjour,
Par définition une constante n'est pas variable
Il est préférable d'initialiser la valeur à l'ouverture du fichier
déclarer une variable globale

Code:

---

1 2	Dim chemin As String

---

puis à l'ouverture du fichier

Code:

---

1 2 3 4

Private Sub Workbook_Open() chemin = Activeworkbook.Worksheets("A").range("A10").value End Sub

---

Salut.

Nomme ta plage CheminReseau dans Excel et tu pourras l'utiliser sans problème en VBA via

Code:

---

range("CheminReseau")

---

sans devoir initialiser quoi que ce soit à l'ouverture...

salut Pierre Fauconnier
ou encore :

Code:

---

Public CheminReso As Range

---

et à l'ouverture (une seule fois, donc) :

Code:

---

Set CheminReso = Range("A10")

---

Il suffira dès lors de se référer à CheminReso, qui renverra toujours le contenu de A10, quelle que soit la procédure qui l'utilise. Ex :

Code:

---

Msgbox CheminReso

---

puisque, par défaut de propriété, la propriété utilisée par VBA est Value.

Perso, je ne comprends pas bien pourquoi se compliquer la tâche en définissant une variable globale qu'il faut initialiser à un moment ou à un autre, alors qu'une plage nommée fait l'affaire.

De plus, si l'utilisateur doit modifier le chemin réseau à un moment ou à un autre, il faudra, pour que la nouvelle valeur soit placée dans la variable, soit fermer et ouvrir à nouveau le classeur, soit intercepter l'évènement Change de la feuille concernée pour modifier la valeur de la variable... Beaucoup de code pour rien, donc, là où ma solution ne fait intervenir aucune ligne de code.

Enfin, si un débogage survient à un moment ou à un autre et qu'il y a arrêt du code, la variable devra être initialisée à nouveau...

J'ai tendance à dire que lorsque l'on programme en VBA pour Excel, il faut d'abord penser Excel, cela simplifie grandement le code, d'une façon générale.

Bonjour.

A mon avis, ce qui est constant, ce n'est pas la valeur de la cellule, mais la cellule elle-même.
Comme une constante ne peut pas être de type objet, on peut oublier.
Après, entre utiliser une cellule nommée ou appeler directement la cellule, il n'y a pas grande différence, sauf que l'utilisation d'un nom préserve le code en cas de déplacment de la cellule.
La solution de Pierre Fauconnier me semble donc la meilleure.
Par contre, pour appeler la cellule au lieu de

Code:

---

Range("Chemin Reseau")

---

Je préfère

Code:

---

Thisworkbook.Names("CheminReseau").Referstorange.Value

---

C'est plus sûr si on a plusieurs classeurs ouverts qui contiendraient le même nom.

Cordialement,

PGZ

Citation:

---

Envoyé par pgz

...sauf que l'utilisation d'un nom préserve le code en cas de déplacment de la cellule.
...

---

+1

Citation:

---

Envoyé par pgz

...

Code:

---

Thisworkbook.Names("CheminReseau").Referstorange.Value

---

C'est plus sûr si on a plusieurs classeurs ouverts qui contiendraient le même nom....

---

+1

:ccool:

vous avez bien raison et m'en veux (le reste marche (- avec l'utulisation de Set -sans utiliser l'évènement Change ) de ne pas avoir pensé à un déplacement éventuel, notamment par l'utilisateur :oops:
Me voilà pour le coup devenu extrêmement prudent. Plus question de faire confiance à qui que ce soit car dieu seul (et encore !) sait ce que pourrait bien faire l'utilisateur (entre déplacements (et le Set est fichu), renommages (:?), suppressions pures et simples (:)) etc...
Diable, diable !
Comment alors faire sans dépendre ni de gestes "innocents", ni de gestes "malveillants" ? Tout brider ? tout contrôler ?
Je dirais alors volontiers que je m'arrangerais (dans le cas objet de la présente discussion) pour que ma variable CheminReso ne puisse jamais être compromise par un geste de l'utilisateur. J'éviterais donc d'en mettre la valeur dans une cellule, carrément, préférant la gérer dans mon code lui-même ;)

Citation:

---

Envoyé par babaothe

...
Je dirais alors volontiers que je m'arrangerais (dans le cas objet de la présente discussion) pour que ma variable CheminReso ne puisse jamais être compromise par un geste de l'utilisateur. J'éviterais donc d'en mettre la valeur dans une cellule, carrément, préférant la gérer dans mon code lui-même ;)

---

Et comment géreras-tu le fait que l'utilisateur puisse modifier le chemin d'accès? Tu lui donnes accès au code? Tu lui demandes qu'il t'envoies son fichier pour que tu fasses la modif? Comment géreras-tu que le chemin soit modifié par le service informatique (lettre qui change, ...), etc, etc?

C'est irréaliste en environnement professionnel, ce que tu prônes comme solution. :cfou:

Il ne faut JAMAIS coder des données en dur, la maintenance est impossible avec ce genre de solution.

On peut tester l'existence de la plage nommée avant de l'utiliser, et gérer
- qu'elle n'existe pas
- qu'elle ne contient pas un chemin valide

Ecrire le chemin en dur est une ineptie sans nom...

Citation:

---

Envoyé par Pierre Fauconnier

Et comment géreras-tu le fait que l'utilisateur puisse modifier le chemin d'accès? Tu lui donnes accès au code? Tu lui demandes qu'il t'envoies son fichier pour que tu fasses la modif? Comment géreras-tu que le chemin soit modifié par le service informatique (lettre qui change, ...), etc, etc?

---

Pas en dur, mais en résultat d'une inputbox, résultat dont je contrôlerais de surcroît la validité ...(bien évidemment)
Mais on sort maintenant du sujet principal.
Amitiés

Et tu le demandes alors au moins une fois par ouverture de fichier pour initialiser une variable?? Pratique si la valeur ne change jamais, si un utilisateur particulier ne connaît pas le chemin mais a néanmoins besoin d'utiliser le fichier avec un chemin prédéfini, si le chemin est long à saisir, etc, etc,... :roll:

La solution d'une plage nommée, utilisable facilement comme le prône PGZ est, crois-moi, la meilleure des solutions...

J'avais déjà essayé de nommer la plage mais en déclarant comme constante et ça ne marchait pas

mais

Code:

---

range("CheminReso")

---

ok

sur qd le chemin est long et peut etre modifié il vaut mieux pouvoir le changer ou le faire changer par l'utilisateur facilement, modifier dans une cellule me semblait être une bonne solution.

merci à tous, toujours aussi instructif !