documents Excel séparés

Bonjour, jai un petit probleme avec mon code....lorsque jecris dans un nouveau document Excel et que jai deja un document Excel ouvert....mon code utilise le meme fichier et lui ajoute un workbook. Jaimerais que mon code crée un autre document séparé et indépendant de celui/ceux ouvert(s).

voici ma structure de code:

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim xlApp As New Excel.Application Dim xlBook As Excel.Workbook     Set xlBook = xlApp.Workbooks.Add ...   Set xlBook = Nothing Set xlApp = Nothing

---

merci

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Sub Test() Dim xlApp As New Excel.Application Dim xlBook As Workbook Dim xlWkst As Worksheet Set xlBook = xlApp.Workbooks.Add Set xlWst = xlBook.Worksheets("feuil1") xlApp.Visible = True 'juste pour tester xlBook.Activate 'Idem xlWst.Cells(1, 1) = "Ça gaze !" xlWst.Cells(2, 1) = "Attendre que ça se ferme" Application.Wait (Now + TimeValue("0:00:03"))   xlBook.Close False xlApp.Quit Set xlBook = Nothing Set xlApp = Nothing End Sub

---