Remplacer Chemin par le nom de la cellule

Bonjour,

Voilà actuellement j'ai un code VBA qui contient un chemin
pour ouvrir un classeur.

J'aimerais remplacer le chemin par une cellule nommée
et donc indiquer le chemin dans la Cellule nommée.

Extrait du code:

DebutNomFichier = wshCible.UsedRange.Rows.Count + 2

Set wbkSource = Workbooks.Open("O:\SUIVI VOLUMETRIE\BASE DE DONNEES.XLS")

Set wshSource = wbkSource.Worksheets(4)

Je veux donc noter le chemin "O:\SUIVI VOLUMETRIE\BASE DE DONNEES.XLS" dans une cellule d une feuille nommée chemin.
Pour noter le nom de la cellule dans le code VBA.

Le but est de faciliter les changements, remplacer le contenu d'une cellule au lieu
de modifier l'ensemble du code.

Par avance merci

CHARLYJACK