各位前輩 我用D6完成了一個.XLS的Excel檔並指定符號區隔, 且也能直接呼叫,但結果卻如同TXT一般沒有依儲存格切割, 可是若經由Excel應用程式開啟就可以正常選擇切割符號, 真奇怪..為什麼?要加些什麼指令嗎?? ==直接呼叫程式如下=== : (取資料) : Coinitialize(nil); vatMSTool := CreateOleObject('Excel.Application'); strFD :=strFile; vatMSTool.WorkBooks.Open(strFD); vatMSTool.Application.Visible := True; ====================== 另外,正常開啟後雖可以選切割符號, 但為避免選錯,可否加入控制直接選取規定符號來切割, 不由User任意決定...謝謝

Extracted from the help (VBAXL9.CHM in Office 2000) in Excel 2000 (Application.Workbooks): OpenText Method Loads and parses a text file as a new workbook with a single sheet that contains the parsed text-file data. Syntax OpenText(Filename, Origin, StartRow, DataType, TextQualifier, ConsecutiveDelimiter, Tab, Semicolon, Comma, Space, Other, OtherChar, FieldInfo, DecimalSeparator, ThousandsSeparator) OpenText Method Example This example opens the file Data.txt and uses tab delimiters to parse the text file into a worksheet. Workbooks.OpenText filename:="DATA.TXT", _ dataType:=xlDelimited, tab:=True

hi~william Thank you for your answer... I'll try it angin!