problème de range avec transferspreadsheet vers excel

Bonjour.

Je crée en ce moment une application qui transfère les données d'une db access vers un fichier excel.
Au départ, j'avais créé le fichier excel dans excel directement, j'ai donné un nom à mes cellules et la fonction transferspreadsheet fonctionnait à merveille.
Maintenant je crée le fichier excel avec vb.net et pour donner un nom aux cellules cibles j'utilise :

Code:

---

xlSheet.Range("A1:P150").Name = "test"

---

Avec la fonction spreadsheet suivante :

Code:

---

acApp.DoCmd.TransferSpreadsheet(Access.AcDataTransferType.acExport, Access.AcSpreadSheetType.acSpreadsheetTypeExcel9, "results", "C:\Excel - Test\Test VB\Template.xls", True, "test")

---

Mais lorsque je lance le run, il me sort que la table "test" existe déjà. Qu'elle est la différence par rapport au nom que je donnais directement dans excel ? (Et je ne mentionne "test" nulle part ailleurs dans mon appli, ni ne définis aucun autre range)

Et lorsque je rajoute le nom de la feuille "Sheet1!test", il me dit qu'il y a un problème de syntaxe dans le terme "Sheet1$test", quel caractère dois-je mettre pour qu'il garde mon "!" comme un "!" et non un "$" ?

Merci.

Bon voilà, j'ai trouvé.

En fait, après mon Transferspreadsheet() je faisais un .saveas() de mon workbook et c'est ça qui le réeffaçait, parce que la fonction transferspreadsheet apparemment sauve déjà le fichier. Et donc toutes mes données sont rentrées dans le fichier sans devoir donner un range, j'ai donc effacé le dernier argument de ma fonction de transfert qui devient donc :

Code:

---

acApp.DoCmd.TransferSpreadsheet(Access.AcDataTransferType.acExport, Access.AcSpreadSheetType.acSpreadsheetTypeExcel9, tblname, TargetTB1.Text, True)

---

Merci à ceux qui m'ont lu.