Comment automatiser la conversion d 'un type de fichier sans l'ouvrir

Amigos

XLDnaute Nouveau
Bonjour ,

Auriez vous une idée , dans SAP d'une transaction mal paramétrée, le fichier que l'on exporte sous excel,est en texte unicode


Donc Je suis obligée de ré ouvrir le fichier et de modifier le type de fiche en format .xls manuellement

Merci de votre aide
 
C

Compte Supprimé 979

Guest
Re : Comment automatiser la conversion d 'un type de fichier sans l'ouvrir

Salut Amigos,

Comme tu utilises SAP, tu connais peut-être l'état A5, voici le code que j'utilise pour ouvrir le fichier texe unicode
Et supprimer certains espaces
Code:
  ' Ouvre le fichier Etat A5  Workbooks.OpenText Filename:=NomFic, Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, _
    TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=True, _
    Comma:=False, Space:=False, Other:=False
  ' Supprimer les espace qui sont des espaces vides
  Cells.Select
  Selection.Replace What:="                    ", Replacement:="", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

A adapter pour ton cas ;-)

A+
 

Discussions similaires

Statistiques des forums

Discussions
312 177
Messages
2 085 972
Membres
103 073
dernier inscrit
MSCHOE16