Excel naar text-format

[le-fer]

Hallo,

Voor mijn applicatie moet er een text bestand worden ingelezen in Excel. Deze kan uit meerdere kolommen bestaan (comma separated).
Nu heb ik voor de eerste 5 kolommen het voor elkaar gekregen dat de inhoud als 'text' wordt geschreven. Maar stel dat dit nu 100 kolommen zijn... hoe doe ik dat dan? Kan ik dan 'dynamisch' (of voor het hele werkblad) dit goed laten zetten?

Hieronder een stuk van de code zoals deze nu bestaat:

Workbooks.OpenText Filename:=fname(u_f), _
Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=False _
, Comma:=False, Space:=False, Other:=True, OtherChar:="|", FieldInfo _
:=Array(Array(1, xlTextFormat), Array(2, xlTextFormat), Array(3, xlTextFormat), Array(4, xlTextFormat), Array(5, xlTextFormat)), TrailingMinusNumbers:= _
True, TextVisualLayout:=True

 

[Trustno1]

Dan moet je aangeven wat de scheiding is. Dan maakt het niet uit uit hoeveel kolomen hij bestaat. Wat is in het tekstbestand de scheiding tussen de karakters? Is dat een vaste breedte, komma of iets dergelijks?

 

[le-fer]

Dat staat al aangegeven in de code: OtherChar:="|"
En dit werkt ook.

Het is de bedoeling dat het hele worksheet de eigenschap 'text' heeft.