VBA - Enregistrement fichier automatique
Bonjour à tous,
je suis novice en VBA et aimerais obtenir vos avis sur un sujet.
J'aimerai automatiser un fichier me permettant dès lors que je clique sur un bouton macro, un nouveau fichier est alors généré avec les data de l'onglet et enregistré sur mon bureau. Ce nouveau fichier prendrait le nom de ce qui est inscrit dans la cellule C2 (du fichier attaché à ce message).
Pensez-vous que cela est possible ?
Merci de votre aide précieuse.
Bonjour,
Oui c'est possible et voici plus ou moins la façon d'y parvenir :
Sub nvclasseur()
chemin = "C:\...\Desktop\"
with activesheet
nomwb = .range("C2").value & ".xlsm" 'nom nouveau classeur
.copy 'copie feuille active dans nouveau classeur
end with
activeworkbook.close savechanges:=true, filename:=chemin & nomwb 'fermeture et sauvegarde à l'endroit voulu
end subIl reste maintenant à insérer un bouton sur la feuille à dupliquer et à lui affecter la présente macro.
Cdlt,
Bonsoir 3GB, merci pour votre retour.
Lorsque je l'affecte, je recois un message d'erreur sur cette ligne.
Merci
Bonjour,
Oui, c'est normal. Désolé, je ne l'ai pas précisé mais il faut mettre votre vrai chemin pour accéder au bureau. Celui du code est un exemple.
Donc il faut remplacer "C:\...\Desktop\".
Réessayez avec ce code en modifiant le chemin (1è ligne) :
Sub nvclasseur()
chemin = "C:\Users\nomutilisateur\Desktop\" '<<<<< ADAPTER
with activesheet
nomwb = .range("C2").value 'nom nouveau classeur
.copy 'copie feuille active dans nouveau classeur
end with
activeworkbook.close savechanges:=true, filename:=chemin & nomwb 'fermeture et sauvegarde à l'endroit voulu
end subCdlt,