*Loest* Aapne en text fil med Excel

[Patton]

Hei, jeg oensker aa aapne en text fil, med tabulator som delimiter, i excel.

 

Dessverre er mine VB kunnskaper forfaerdelig saa jeg sliter litt med parameterene. Jeg har kommet saa langt:

 

Set Excel = CreateObject("Excel.Application")
Set Workbook = Excel.Workbooks.Open

 

Foerste parameter er fila. Parameter nummer 4 er format (1 for tabulator). Parameter 2 og 3 lager hodebry for meg

 

Noen som kan hjelpe meg videre?

Endret 15. september 2006 av Patton

[GeirGrusom]

workbooks1.Open(Filename, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMru, Local, CorruptLoad)

 

parameter 2 er UpdateLinks, den kan være

1 User specifies how links will be updated

2 Never update links for this workbook on opening

3 Always update links for this workbook on opening

 

Parameter tre skal være True eller False for om du skal kunne skrive til fila.

 

Men egentlig er alle bortsett fra parameter1 optional.

 

så du skal kunne skrive Excel.Workbooks.Open("Ialla.xls")

 

Men hvis du vil ha tabulator format:

Set Workbook = Excel.Workbooks.Open("Ialla.xls", 2, False, 1, , , , , Chr(9))

 

Burde funke.

Men du trenger kanskje bare ta med fire parameter.

[Patton]

Takker, fungerte fint!

 

Naar jeg konverterer excel-fila tilbake til text-format gjoer jeg foelgende:

 

Workbook.SaveAs "jalla.txt", xlText

 

Jeg faar da en dialog om jeg virkelig vil lagre fila som text. Jeg oensker aa lage en "silent" script, uten brukerinteraksjon. Er det mulig aa hoppe over dialogen, eller gi dialogen et standard svar?

[Patton]

Glem det, fant ut hvor problemet var.