Ouvrir un répertoire à l’aide d’une valeur dans une cellule

Résolu/Fermé

Blackjack23 Messages postés 7 Date d'inscription samedi 5 décembre 2015 Statut Membre Dernière intervention 17 janvier 2016 - 5 déc. 2015 à 10:01
Blackjack23 Messages postés 7 Date d'inscription samedi 5 décembre 2015 Statut Membre Dernière intervention 17 janvier 2016 - 5 déc. 2015 à 20:28

Bonjour, je suis novice en programmation Vb excel, si vous pouviez m’aider, voici mon problème

Je souhaite enregistrer une feuille excel dont la destination (le dossier final) et le nom du fichier xlsm sont renseignés séparément dans une cellule (infos dans cette même feuille)
Ex: "C:\dossier1\dossier2\ « Nom du dossier dans cellule N8 »\ « Nom du fichier dans cellule Q11 ».xlsm"

Merci

A voir également:

Ouvrir un répertoire à l’aide d’une valeur dans une cellule
Aller à la ligne dans une cellule excel - Guide
Comment ouvrir un fichier epub ? - Guide
Comment ouvrir un fichier docx ? - Guide
Ouvrir un fichier .bin - Guide
Ouvrir un fichier rar - Guide

2 réponses

Réponse 1 / 2

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
5 déc. 2015 à 11:19

Bonjour,

comme ceci:

Sub Save_classeur()
Dim chemin, nom As String
chemin = "C:\dossier1\dossier2\" &  Range("N8").Value & "\"
nom = Range("Q11").Value

   'xlsm
    ActiveWorkbook.SaveAs Filename:=chemin & nom & ".xlsm", _
        FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
End Sub

Réponse 2 / 2

Blackjack23 Messages postés 7 Date d'inscription samedi 5 décembre 2015 Statut Membre Dernière intervention 17 janvier 2016
5 déc. 2015 à 20:28

FORMIDABLE!

ça marche, merci.

Discussions similaires

"Aucune application permettant d'ouvrir cette URL"

Excel:récupérer le contenu d'une cellule en fonction d'une autre

formule de calcule

Excel VBA : Récupérer la valeur d'une cellule

Discussions similaires

Newsletters