J'essaye d'ouvrir ce fichier avec Excel text en vue d'un traitement
Mais je narrive pas à supprimé les doubles quote avec cette commande delphi"HORODATE" "NAMEID" "VALABS" "VALH""VALH_ERR"
"31.05.2006 09:00:00" "1" "127587770" "950" "0"
"31.05.2006 09:00:00" "2" "46603300" "1690" "0"
"31.05.2006 09:00:00" "4" "103564250" "1630" "0"
"31.05.2006 09:00:00" "5" "116899660" "3640" "0"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 OA.Workbooks.OpenText(FichierAr, xlWindows, //Origin 1, //StartRow xlDelimited, //DataType xlTextQualifierDoubleQuote,//TextQualifier xlTextQualifierSingleQuote xlNone, xlSingleQuote True, //ConsecutiveDelimiter False, //Tab False, //Semicolon True, //Comma False, //Space True, //Other Vig, //OtherChar EmptyParam, //FieldInfo EmptyParam, //Array1 EmptyParam, EmptyParam);
Partager