Jump to content
Sign in to follow this  
smellyfingers

Import from .txt to .xls

Recommended Posts

smellyfingers

Hi im trying to import a .txt to a new excel book and that works as planned so far accept it´s missing the zeros in the nr rows, is there a parameter to just format the whole book as text before the import?

Thanx!

Share this post


Link to post
Share on other sites
water

How do you import the data? Manually or by script?


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (2018-06-01 - Version 1.4.9.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2018-09-01 - Version 1.3.4.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
PowerPoint (2017-06-06 - Version 0.0.5.0) - Download - General Help & Support
Excel - Example Scripts - Wiki
Word - Wiki
 
Tutorials:

ADO - Wiki

 

Share this post


Link to post
Share on other sites
smellyfingers

Hi water, i do it by script,like this

#include <Excel.au3>
#include <Array.au3>
Dim $oExcel
$oExcel = ObjCreate("Excel.Application")
$oExcel.Visible = 1
$oExcel.Workbooks.OpenText("\\DubbelkollOMT\Mobilnummer.txt", _
   1252,  _ ; Origin 
   1,    _ ; StartRow
   1,  _ ; DataType = x1Delimited
   2,  _  ; TextQualifier = x1DoubleQuote
   False,  _  ; ConsecutiveDelimiter
   True,   _  ; Tab
   False,   _  ; Semicolon
   False,  _ ; Comma
   False,  _ ; Space
   False  _ ; Other
      )
_ExcelBookSaveAs($oExcel, "\\DubbelkollOMT\Mobilnummer.xls", "xls", 0, 1)
_ExcelBookClose($oExcel)

Share this post


Link to post
Share on other sites
water

You could pass parameter FieldInfo. An array containing parse information for individual columns of data. Set the column to xlTextFormat.

Edited by water

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (2018-06-01 - Version 1.4.9.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2018-09-01 - Version 1.3.4.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
PowerPoint (2017-06-06 - Version 0.0.5.0) - Download - General Help & Support
Excel - Example Scripts - Wiki
Word - Wiki
 
Tutorials:

ADO - Wiki

 

Share this post


Link to post
Share on other sites
smellyfingers

Funny, i was looking at that page just before you posted :), but how do i actually pass that parameter in a correct way based on the script example?

Thanx

Share this post


Link to post
Share on other sites
water

Please check the of the Excel UDF I'm working on. It's just an alpha version but function _Excel_BookOpenText should do what you want. Check example 1 in _Excel_BookOpenText.au3 for an example.

Edited by water

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (2018-06-01 - Version 1.4.9.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2018-09-01 - Version 1.3.4.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
PowerPoint (2017-06-06 - Version 0.0.5.0) - Download - General Help & Support
Excel - Example Scripts - Wiki
Word - Wiki
 
Tutorials:

ADO - Wiki

 

Share this post


Link to post
Share on other sites
smellyfingers

Sweet thanx i will check it out tomorrow when I'm back at work, thanx :)

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×