Re: [prog] importer un fichier de données dan s calc

[Olivier Villatte]

Bonjour Sebastien, J'ai aussi besoin de cette fonctionnalité pour intégrer dans calc des résultats de requetes. tu peux essayer ce bout de code (séparateur |) ' Définit le nom du fichier Filename = "X:\fichier.txt" Doc = StarDesktop.loadComponentFromURL("private:factory/scalc", "_blank", 0, arg) Sheet = Doc.Sheets(0) Ligne = 0 FileNo = Freefile Open Filename For Input As FileNo Do While not eof(FileNo) ' Lit la ligne Line Input #FileNo, CurrentLine     If CurrentLine <>"" then         TmpString = CurrentLine & "|"         Colonne = 0         Do while len(TmpString) >1             cell = Sheet.getCellByPosition(colonne,Ligne)             'myTemp sert juste à verifier qu'une chaine comportant juste un E ou D et des numériques ne             'sera pas importé comme un nombre en ecriture scientifique (ex 02E03)             myTemp = InStr(rtrim(left(TmpString, InStr(TmpString, "|")-1)), "E") + _                      InStr(rtrim(left(TmpString, InStr(TmpString, "|")-1)), "D")             if myTemp <> 0 then                 cell.String = ltrim(rtrim(rtrim(left(TmpString, InStr(TmpString, "|")-1))))             else                 cell.FormulaLocal = ltrim(rtrim(left(TmpString, InStr(TmpString, "|")-1)))             endif             TmpString = right(TmpString, len(TmpString)-InStr(TmpString, "|"))             colonne = colonne +1         Loop         Ligne = Ligne +1     end if Loop ' Ferme le fichier Close #FileNo Olivier Sebastien Remy a écrit : Bonjour, je souhaiterai savoir quel est l'équivalent de la fonction "insertion d'une feuille à partir d'un fichier" sous la version 2.0. En effet, je dois importer un fichier txt dont les données sont séparées par un point virugle. Merci --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]