Créer un nouveau classeur, le nommer et le fermer

Résolu
BABUDROME Messages postés 151 Date d'inscription lundi 16 janvier 2006 Statut Membre Dernière intervention 19 avril 2016 - 7 avril 2016 à 16:25
BABUDROME Messages postés 151 Date d'inscription lundi 16 janvier 2006 Statut Membre Dernière intervention 19 avril 2016 - 8 avril 2016 à 21:03
Bonjour,
A partir d'un classeur existant, de ses données installées dans une feuille et des résultats acquis reportés dans une autre feuille, je souhaiterai créer un nouveau classeur pour y enregistrer cette autre feuille.
Je bute sur Workbooks.add, sur le nouveau nom à lui attribuer, sur les données à lui fournir et sur sa fermeture.

Merci d'avance. bab

1 réponse

ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 236
7 avril 2016 à 17:20
Bonjour,
Nomme-le donc en le sauvegardant.
Exemple :
Dim nouv As Workbook
Set nouv = Workbooks.Add
' travaille maintenant ce que tu veux sur l'objet nouv
' par exemple : ===>>>
With nouv
nouv.Worksheets("Feuil1").Range("A1") = "voilà"
End With
nouv.SaveAs "d:\coucou.xls"
nouv.Close

0
BABUDROME Messages postés 151 Date d'inscription lundi 16 janvier 2006 Statut Membre Dernière intervention 19 avril 2016
8 avril 2016 à 21:03
Salut et Merci. Réalisation OK
Bab
0