Bonjour,

Pour enregistrer ma feuille de calcul, je passe par un bouton dans un UF.
la commande pour ouvrir la boite de dialogue est Application.Dialogs(xlDialogSaveAs).Show
Par défaut le nom du fichier proposé est "classeur1.xls"
Comment faire pour que "classeur1" prenne la valeur des cellules S2 et BA2 tout en gardant le choix du répertoire.

Merci

Bonsoir

comme ceci

chemin = Sheets(1).Range("S2")) & Sheets(1).Range("BA2"))

Application.Dialogs(xlDialogSaveAs).Show (chemin)

gilbert_rgi a écrit :

Bonsoir

comme ceci

chemin = Sheets(1).Range("S2")) & Sheets(1).Range("BA2"))

Application.Dialogs(xlDialogSaveAs).Show (chemin)

Merci beaucoup

ça marche, mais si la cellule S2 comporte un point ex: S2= bl.15, là ça marche plus, comment conserver le point ?
sinon c'est pas grave, tu m'as déjà bien aidé

Certains caractères ne sont pas admis dans les noms de dossiers et de fichiers c'est normal

il faudrait donc supprimer ces caractères du chemin c'est faisable mais aujourd'hui c'est repos

Re,

Non c'est bon comme ça, te casses pas la tête, le point on le mettra pas dans les cellules en question.
Je note résolu, merci beaucoup et bon week-end

Alors mettre cette ligne de code après le premier chemin

chemin = Replace(chemin, ".", " ")

gilbert_rgi a écrit :

Alors mettre cette ligne de code après le premier chemin

chemin = Replace(chemin, ".", " ")

C'est parfait, merci beaucoup

bon week End gilbert_rgi

Lui a écrit :

gilbert_rgi a écrit :

Alors mettre cette ligne de code après le premier chemin

chemin = Replace(chemin, ".", " ")

C'est parfait, merci beaucoup

bon week End gilbert_rgi

S'il y a d'autres caractères a supprimer il est également possible de traiter le(s) caractère(s) a éviter avec cette procédure

C'est retenu !
Encore merci