Créer un fichier xls à partir d'un macro [Résolu]

Signaler
Messages postés
40
Date d'inscription
lundi 23 mars 2009
Statut
Membre
Dernière intervention
11 juin 2010
-
Messages postés
40
Date d'inscription
lundi 23 mars 2009
Statut
Membre
Dernière intervention
11 juin 2010
-
Bonjour,
J'arrive pas à créer un fichier "aa.xls" à partir d'un macro, qui peut m'aider?

Cordialement,

Wassim

4 réponses

Messages postés
32448
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
13 mai 2021
347
oups.. j'avais oublié un ""..
comme ceci ce sera mieux
Sub nouv_classeur()
    Workbooks.Add 'ajout d'un nouveau classeur
    Chemin = Application.Path 'repertoire où enregistrer le classeur
    NomClasseur = "aa.xls" ' nom du classeur
    ActiveWorkbook.SaveAs (Chemin & "" & NomClasseur) ' enregistrement du classeur
End Sub




Cordialement,
Jordane,
Messages postés
32448
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
13 mai 2021
347
Bonjour,
Que désires-tu faire ? Créer un nouveau classeur ou en enregistrer un ?

Pour ajouter un nouveau classeur puis l'enregistrer en tant que : aa.xls, tu peux utiliser le code ci-dessous :

Sub nouv_classeur()
    Workbooks.Add
    Chemin = Application.Path
    NomClasseur = "aa.xls"
    ActiveWorkbook.SaveAs (Chemin & NomClasseur)
End Sub



Cordialement,
Jordane,
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
75
Re-Salut
Quand tu as des questions de ce genre, pense à enregistrer une macro pendant que tu fais la manip à la main : tu auras le code tout fait, il ne te restera plus qu'à changer le nom du fichier par un paramètre par exemple.

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
Messages postés
40
Date d'inscription
lundi 23 mars 2009
Statut
Membre
Dernière intervention
11 juin 2010

ça marche
Merci jordane45


Cordialement,

Wassim