[R] Export Automatique xls vers csv

[Kikki1970]

[Export Automatique xls vers csv]

Bonjour à toutes et à tous,

Je débute sur AutiIt et je cherche un code qui permettrait d'exporter un fichier toto.xls en toto.csv.
Tout cela de façon automatique.
Par exemple clic droit sur fichier convertir vers csv ou dépot du fichier dans un répertoire TMP et une routine qui fait la manip.

Si quelqu'un aurait une idée ?

Merci d'avance

Bien à vous !!!

Kikki

[jguinch]

Merci de modifier le titre du message afin qu'il respecte les règles de présentation d'un message.

Pour ta question, la réponse est dans la doc : User Definied Functions Reference \ Excel Management

[Kikki1970]

Merci de modifier le titre du message afin qu'il respecte les règles de présentation d'un message.

Pour ta question, la réponse est dans la doc : User Definied Functions Reference \ Excel Management

Re-Bonjour,

Désolé jquinch pour les règles, c'est mon premier post... Et merci pour ces infos elles m'ont été très utiles.

Voici le code que j'ai adapté à mes besoins (besoin de renommer toujours le même fichier).

Code : Tout sélectionner

#include <Excel.au3>
#include <MsgBoxConstants.au3>

; Ouverture d'une instance EXCEL et ouverture du fichier
Local $oAppl = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Convertisseur CSV", "Erreur d'ouverture de l'instance EXCEL." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
Local $oWorkbook = _Excel_BookOpen($oAppl, "c:\TMP\I190302 1.xls")
If @error Then
    MsgBox($MB_SYSTEMMODAL, "Convertisseur CSV", "Aucun fichier adéquate présent à l'emplacement C:\TMP" & @CRLF & "@error = " & @error & ", @extended = " & @extended)
    _Excel_Close($oAppl)
    Exit
EndIf

; *******************************************************************************
; Sauvegarde du fichier (xls) dans un autre format (csv) dans le même répertoire.
; Ecrasement du fichier si existant
; *******************************************************************************
Local $sWorkbook = "c:\TMP\I190302 1.csv"
_Excel_BookSaveAs($oWorkbook, $sWorkbook, $xlCSV, True)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Convertisseur CSV", "Erreur d'enregistrement du fichier à l'emplacement C:\TMP" & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Convertisseur CSV", "Fichier exporter à l'emplacement C:\TMP")
ShellExecute($sWorkbook)
_Excel_Close($oAppl)
 

Cependant, j'ai recopier de l'exemple ce code suivant:
#include <Excel.au3>
#include <MsgBoxConstants.au3>
(les 2 premières lignes que si je les supprime, cela génère un plantage et je ne comprends pas...).

Mais bon cela fonctionne.

Bien à toi

Kikki.

[jguinch]

Merci de passer le sujet en [R] si le problème est résolu.

[Kikki1970]

Cependant, j'ai recopier de l'exemple ce code suivant:
#include <Excel.au3>
#include <MsgBoxConstants.au3>
(les 2 premières lignes que si je les supprime, cela génère un plantage et je ne comprends pas...).

Mais bon cela fonctionne.

Bien à toi

Kikki.

Bonjour à toutes et à tous...

Pouvez vous me dire a quoi corresponde ces 2 lignes de code ?
Je veux juste comprendre ...
Merci d'avance.

Kikki

[TommyDDR]

Les fonctions _Excel_xxx ne sont pas des fonctions natives en AutoIt, elles ont donc été écrites, et je vous le donne en mille, elle sont dans le fichier -> Excel.au3
De même que la variable "$MB_SYSTEMMODAL", elle ne sort pas d'un chapeau magique mais du fichier "MsgBoxConstants.au3"