Problème VB/Excel

Bonjour,

J'ai un fichier excel avec plusieurs onglets, dans chaque onglet je dois aller copier une colonne (effectuer avec une boucle VB) que je vais copier dans un nouvel onglet que je crée. Jusque là pas de soucis...

Ensuite j'exporte mon onglet (ou ma feuille si vous préférez) complet dans un fichier *.txt de cette manière :

Set mafeuille = ActiveWorkbook.ActiveSheet
mafeuille.Copy
ActiveWorkbook.SaveAs Filename:=mafeuille.Name, FileFormat:= _
xlText, CreateBackup:=False

Et là...grand mystère, mon fichier est correctement mis en forme SAUF qu'à partir d'une certaine ligne (pas la 255...) j'ai des signes " qui apparaissent alors qu'ils ne sont PAS dans mon onglet excel.

exemple: "( TabString :='B1_TMSO0101_GE0101_DEROG01_ETA_790K4', TabIndexDI := 7, NoNc := TRUE, HistAlarm := TRUE)," ça c'est dans mon fichier .txt

( TabString :='B1_TMSO0101_GE0101_DEROG01_ETA_790K4', TabIndexDI := 7, NoNc := TRUE, HistAlarm := TRUE),
et ça c'est dans ma feuille excel

J'ai par exemple 48 lignes de ce genre et sur la dernière... pouf... plus de "

Pour tester j'ai supprimé toutes les , de la ligne dans mon fichier excel et les " disparaissent du fichier .txt

tandis que quand mes lignes sont sous cette forme celà fonctionne parfaitement( pas de " qui apparaissent):

B1_TMSO0101_VE0101_VEROU01_CDE_860K1 AT %MX8.0 : BOOL; (*PCVUE;1;2;CVC;B1;TMSO0101.VE0101.VEROU01.CDE;L1 commande Verrou Incendie;Actif;Repos;1;0;;;;1;;;;;;;;;;B1_TMSO0101_VE0101_VEROU01_CDE_860K1;;;;;;;;;;;;;*)

Je ne peux pas conserver ces " car ce fichier texte est envoyé dans un automate programmable qui doit recevoir une forme de texte bien précise pour faire de la supervision par exemple.

Si qqun pourrait m'aider à résoudre ce grand mystère..., ou alors me donner une meilleure solution d'exporter ma feuille dans fichier texet, merci d'avance (Version: Excel 2007 avec VB 6.3)