Excel中有一列數據是數字和文本方式混合排列的，在用ADO導入數據時就會出現部分數據不能導入的問題

解決這個問題 首先想到的是常用的數字轉換為文本格式的方法 WorkSheet.Columns[1].NumberFormatLocal:='@';

幾行代碼一敲，測試發現沒效果，就馬上開始 baidu,google 鋪天蓋地的搜索。。。

沒怎么搜索就找到了excel 中有用分列方法將整列數據文本格式化的方法：數據->分列->列數據格式->文本

錄制下的宏代碼如下：

接下來將VBA宏代碼翻譯成delphi代碼：

一編譯才發現 Array(1,2) 語法錯誤，于是將其改成delphi 中的數組格式 Array[0..1] of Integer=(1,2) ，

編譯還是報錯，發現是因為是Delphi調用OLE自動化控制器操縱Excel，該方法只能出現OleVariant類型的參數，馬上找資料看有沒有OleVariant類型的數組，一下就找到了馬上改了代碼換上去：  

滿以為這下問題應該解決了吧，編譯通過，測試發現點都么反應，郁悶了。。。

到底是哪點的原因呢？開始排查問題中。。。

第一個可能的原因，excel 宏寫錯了？反復測試，都能正常運行，效果明顯。

第二個可能的原因，delphi OLE操縱Excel 失效？測試了其他Ole代碼，都能正常運行，沒有問題。

現在就剩下一個比較確定的問題了，WorkSheet.Selection.TextToColumns 這個方法的問題。

搜索引擎中輸入"delphi TextToColumns" 搜出來的結果寥寥可數，遇到這個問題的很少，提的問題大多都沒人回答，

許多人甚至不知所云，千辛萬苦找到MSDN中的幫助中有 C# 調用 excel 這個方法的示例，但是關鍵地方就是數組參數

他用空值代替了：

反復的看幫助中對 FieldInfo 的描述：

FieldInfo

類型：

一個數組，包含各個數據列的分析信息。解釋取決于 DataType 的值。當對數據進行分隔時，此參數是一個由兩元素數組組成的數組，每個兩元素數組都指定特定列的轉換選項。第一個元素是列號（從 1 開始），第二個元素是指定如何分析列的 常數之一。

可以是下列 值之一：

只有當安裝并選擇了臺語支持時，才能使用 。 指定所使用的臺語紀元日期。

列說明符可以采用任何順序。如果對于輸入數據中的特定列，給定的列說明符不存在，則用 設置對列進行分析。

如果源數據具有固定寬度的列，則每個兩元素數組中的第一個元素都指定該列中的起始字符位置（以整數形式指定；0（零）是第一個字符）。兩元素數組的第二個元素將該列的分析選項指定為從 1 至 9 的數字，如上面列出的那樣。

還是不明所以。。。接下來就是漫長的碰運氣時間。。。。

改不同的參數運行測試，反復N次，每次都是失望的結果。就這樣被這個問題折磨了3天多的時間，我絕望了，很想放棄，因為我至少找到了數據導入出現空行的原因和解決方法，只是不能用程序實現，每次導入數據前人工操作excel將數據格式化也不是太麻煩。但在花了這么多時間和精力后我能放得下嗎？就這樣心甘情愿的認輸？對自己說，我做不到？不！一定能行，我還沒有失敗，相反已經成功了一半了，剩下的那一半只是時間和靈感問題，這時候放棄了才是真的失敗了。稍微放松下，暫時什么都不想，等會一定把你搞定 。打幾盤魔獸先

這一刻終于來臨，一段代碼突然給我帶來了靈感，我是不是應該把參數類型帶進去？雖然資料和幫助都沒提到，但是語法上應該是沒問題的，說做就做：

運行，測試，通過 ！！！喔耶，完美解決，perfect ！ 怎一個爽字了得。。。哈哈哈哈哈哈

編程也需要不拋棄，不放棄，還有一點點靈感。我能！無所不能！