Copier un chemin mis sur feuille Excel dans une fonction

Bonjour,

Pour enregistrer un dossier, j'ai une fonction qui commence par:

dossier = "C:\Users\Acer\Desktop\ et, la suite du chemin.

Ce que je souhaiterais:

Avoir une feuille excel et introduire (par exemple) en B3

dossier = "C:\Users\Acer\Desktop\essai1 et, la suite du chemin et que cela se copie comme chemin dans la macro 1

Avoir une feuille excel et introduire (par exemple) en B5

dossier = "C:\Users\Acer\Desktop\essai2 et, la suite du chemin et que cela se copie comme chemin dans la macro 2

Avoir une feuille excel et introduire (par exemple) en B7

dossier = "C:\Users\Acer\Desktop\essai3 et, la suite du chemin et que cela se copie comme chemin dans la macro 3

De ce fait, si je change un chemin, je le modifie dans la feuille excel et je n'ai pas besoin d'aller rechercher les macros étant concernées par ce nouveau chemin, les modifier et au risque d'en oublier une.

En vous remerciant.

Bonne réception.

Bien cordialement.

Bonjour

Dans la cellule ne pas écrire dossier= mais juste le chemin

Dans le code :

Dim Chemin as string

Chemin = Worksheets("NomFeuille").Range("B3")

en adaptant le nom de la feuille

Utiliser ensuite la variable Chemin

Bonjour

Bonjour à tous

Un exemple à adapter.

Bye !

Bonjour GMB, bonjour 78chris.

En vous remerciant pour vos réponses et en m'excusant pour la réponse tardive, mais j'ai du m'absenter.

Gmb, j'ai essayé votre macro, en mettant:

C:\Users\Acer\Desktop\essai1,xlsx

mais j'ai un message d'erreur:

erreur d'exécution 1004

désolé nous ne trouvons pas c:\user\acer\desktop\essai1,xlsx.xlsx. Peut être l'avez vous déplacé, renommé ou supprimé?

J'ai supprimé la fin du chemin ,xlsx

C:\Users\Acer\Desktop\essai1

erreur d'exécution 1004

désolé nous ne trouvons pas c:\user\acer\desktop\essai1. Peut être l'avez vous déplacé, renommé ou supprimé?

Je n'ai plus les 2 fois xlsx

J'ai mis devant le début du chemin un guillement

"C:\Users\Acer\Desktop\essai1

erreur d'exécution 1004

désolé nous ne trouvons pas "c:\user\acer\desktop\essai1. Peut être l'avez vous déplacé, renommé ou supprimé?

"C:\Users\Acer\Desktop\essai1,xlsx

j'ai une fois xlsx.

Est ce normal?

78chris

Vous avez un worksheets avec le nom de la feuille, mais je recherche juste en mettant le nom du chemin, que celui-ci soit ouvert sans aller dans les feuilles.

Mais peut être ai je mal compris la manipulation à effectuer.

Bonne réception à tous les deux.

Bien cordialement.

RE

En VBA on précise normalement toute l'arborescence : nom du classeur.nom de la feuille.range

de façon à ne pas prendre B3 n'importe où !

C'est la base

Ici en faisant l'économie du nom du classeur on prend déjà un risque si plusieurs classeurs sont ouverts...

Gmb, j'ai essayé votre macro, en mettant:

C:\Users\Acer\Desktop\essai1,xlsx

Tu devrais essayer en mettant un point devant xlsx et non une virgule :

C:\Users\Acer\Desktop\essai1.xlsx

Bye !