UDF > Excel >


_Excel_BookOpenText

Ouvre un fichier texte et exporte le contenu vers un nouveau classeur dans une seule feuille

#include <Excel.au3>
_Excel_BookOpenText ( $oExcel, $sFilePath [, $iStartRow = 1 [, $iDataType = Default [, $sTextQualifier = $xlTextQualifierDoubleQuote [, $bConsecutiveDelimiter = False [, $sDelimiter = "," [, $aFieldInfo = "" [, $sDecimalSeparator = Default [, $sThousandsSeparator = Default [, $bTrailingMinusNumbers = True [, $iOrigin = Default]]]]]]]]]] )

Param�tres

$oExcel Objet application Excel dans laquelle vous voulez ouvrir le nouveau classeur
$sFilePath Chemin et le nom du fichier � ouvrir
$iStartRow [optionnel] La ligne � partir de laquelle commencer l'exportation du fichier (par d�faut = 1)
$iDataType [optionnel] Sp�cifie le format de la colonne des donn�es dans le fichier. Peut prendre toute valeur de l'�num�ration XlTextParsingType.
    Si la valeur est le mot-cl� Default, Excel tente de d�terminer le format de la colonne (par d�faut = mot-cl� par Default)
$sTextQualifier [optionnel] Indique le qualificatif de texte (par d�faut = $xlTextQualifierDoubleQuote)
$bConsecutiveDelimiter [optionnel] True consid�rera des s�parateurs cons�cutifs comme un s�parateur (par d�faut = False )
$sDelimiter [optionnel] Un ou plusieurs caract�res � utiliser comme s�parateur (par d�faut =",")
$aFieldInfo [optionnel] Un tableau contenant des informations pour chaque colonne de donn�es.
    L'interpr�tation d�pend de la valeur de DataType.
    Lorsque les donn�es sont d�limit�es, cet argument est un tableau � deux �l�ments, et chaque �l�ment est un tableau � deux �l�ments
    Indication des options de conversion pour une colonne particuli�re.
    Le premier �l�ment est le num�ro de colonne (� partir de 1), et le second �l�ment est l'un des XlColumnDataType
    Constantes pr�cisant comment la colonne est analys�e (par d�faut = mot-cl� Default )
$sDecimalSeparator [optionnel] S�parateur d�cimal que Excel doit utiliser lors de la reconnaissance des nombres.
    Le param�tre par d�faut est celui du syst�me (par d�faut = mot-cl� Default)
$sThousandsSeparator [optionnel] S�parateur des milliers que Excel doitutilise lors de la reconnaissance des nombres.
    Le param�tre par d�faut est celui du syst�me (par d�faut = mot-cl� Default)
$bTrailingMinusNumbers [optionnel] True traite les nombres avec le caract�re moins � la fin comme des nombres n�gatifs.
    False traite ces nombres sous forme de texte (par d�faut = True)
$iOrigin [optionnel] Origine du fichier texte. Peut �tre l'une des constantes de XlPlatform.
    En outre, cela pourrait �tre un entier repr�sentant le num�ro de la page de code de la page de code d�sir�e.
    Par exemple, "1256" pr�cise que le codage est l'arabe (Windows).
    Si cet argument est omis, la m�thode utilise le param�tre courant de l'option File Origin dans l'Assistant Importation de texte.

Valeur de retour

Succ�s: Retourne un objet classeur.
�chec: Retourne 0 et d�finit @error <> 0.
@error: 1: $oExcel n'est pas un objet ou n'est pas un objet application
2: Le fichier $sFilePatch n'existe pas
3: Impossible d'ouvrir ou d'analyser $sFilePath. @extended contient le code d'erreur COM renvoy� par la m�thode OpenText

Remarque

Le param�tre $aFieldInfo doit �tre un tableau contenant des tableaux, pas un tableau 2D. Voir Exemple 2.

En relation

_Excel_BookAttach, _Excel_BookClose, _Excel_BookNew, _Excel_BookOpen

Exemples

Exemple 1

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

; Cr�e un objet Excel
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox(16, "UDF Excel: _Excel_BookOpenText-Exemple", "Erreur lors de la cr�ation de l'objet Excel." & @CRLF & "@error = " & @error & ", @extended = " & @extended)

; *****************************************************************************
; Ouvre un fichier texte avec s�parateurs, s�parateur = |, passe FieldInfo et d�finit
; DecimalSeparator et ThousandsSeparator.
; *****************************************************************************
Local $sTextFile = @ScriptDir & "\Extras\_Excel1.txt"
Local $aField1[2] = [1, $xlTextFormat]
Local $aField2[2] = [2, $xlTextFormat]
Local $aField3[2] = [3, $xlGeneralFormat]
Local $aField4[2] = [4, $xlDMYFormat]
Local $aField5[2] = [5, $xlTextFormat]
Local $aFieldInfo[5] = [$aField1, $aField2, $aField3, $aField4, $aField5]
_Excel_BookOpenText($oExcel, $sTextFile, Default, $xlDelimited, Default, True, "|", $aFieldInfo, ",", ".")
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookOpenText-Exemple 1", "Erreur lors de l'ouverture de '" & $sTextFile & "'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookOpenText-Exemple 1", "Le classeur '" & $sTextFile & "' a �t� ouvert avec succ�s.")


Exemple 2

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

; Cr�e un objet Excel
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox(16, "UDF Excel: _Excel_BookOpenText-Exemple 2", "Erreur lors de la cr�ation de l'objet Excel." & @CRLF & "@error = " & @error & ", @extended = " & @extended)

; *****************************************************************************
; Ouvre un fichier texte tel quel, tous les autres param�tres seront d�termin�s par Excel
; *****************************************************************************
Local $sTextFile = @ScriptDir & "\Extras\_Excel2.txt"
_Excel_BookOpenText($oExcel, $sTextFile, Default, $xlFixedWidth)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookOpenText-Exemple 2", "Erreur lors de l'ouverture '" & $sTextFile & "'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_BookOpenText-Exemple 2", "Le classeur '" & $sTextFile & "' a �t� ouvert avec succ�s.")