Macro ouvrir fichier avec chemin variable

Bonjour

J'ai besoin d'aide pour une instruction macro

j'ai un classeur TOTO contenant divers onglets dont un onglet "paramètres" qui contient en A1 le chemin où se trouvent d'autres classeurs (ex E:\WDRC STAT\Stat fichiers et bases access\)

Une macro dans TOTO exécute le code suivant

Windows("TOTO.xls").Activate

Sheets("RA18").Select

Range("A2:R500").Select

Selection.ClearContents

Workbooks.Open ("E:\WDRC STAT\Stat fichiers et bases access\RA18.xls"): Value = True

Windows("RA18.xls").Activate

Range("A2:R500").Select

Selection.Copy

etc.....

Je cherche à remplacer "E:\WDRC STAT\Stat fichiers et bases access\" par le contenu de la cellule A1 de l'onglet paramètre du classeur TOTO

Merci d'avance pour votre aide.

ZORGLUB13

Bonjour,

Sans grande conviction par rapport à l'utilisation de la méthode open:

Dim X As String
    Windows("TOTO.xls").Activate
    X = Range("A1")
    Sheets("RA18").Select
    Range("A2:R500").Select
    Selection.ClearContents
    Workbooks.Open X
    Windows("RA18.xls").Activate

Bjr

Cela fonctionne parfaitement

Merci

Bonne fin de journée

ZORGLUB13