C#實現把txt文字資料快速讀取到excel
阿新 • • 發佈：2021-07-09
今天預實現一功能，將txt中的資料轉到excel表中，做為matlab的資料來源。蒐集一些c#操作excel的程式。步驟如下：
下載一個Microsoft.Office.Interop.Excel.dll 在專案中引用。
編寫程式碼如下：
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 |
string path = "c://date//xyu.txt";
StreamReader sr = new StreamReader(path);
string strLine = sr.ReadLine();int rowNum = 1;
object missing = System.Reflection.Missing.Value;
ApplicationClass app = new ApplicationClass();
app.Application.Workbooks.Add(true);
Workbook book = (Workbook)app.ActiveWorkbook;
Worksheet sheet = (Worksheet)book.ActiveSheet;
while (!string.IsNullOrEmpty(strLine))
{
string[] tempArr;tempArr = strLine.Split(',');
for (int k = 1; k <= tempArr.Length; k++)
{
sheet.Cells[rowNum, k] = tempArr[k - 1];
}
strLine = sr.ReadLine();
rowNum++;
}
//儲存excel檔案
book.SaveCopyAs("D://source.xls");
//關閉檔案
book.Close(false, missing, missing);
//退出excel
app.Quit();
MessageBox.Show("轉化成功！");
|
以上程式碼可以實現功能，由於txt中的資料有60501行，資料量太大。我估算了一下，用以上程式碼轉到excel要用大約2-3分鐘。我一共要轉9個txt。一共要用20多分鐘。這樣作出系統顯然是讓人難以忍受的。接著找資料，發現用rang方法可以提高速率。只用大約3-4秒鐘的時間，提高效率幾十倍。程式碼如下：
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 |
string path = "c://date//xyu.txt";
StreamReader sr = new StreamReader(path);
string strLine = sr.ReadLine();
int rowNum = 1;
object missing = System.Reflection.Missing.Value;
ApplicationClass app = new ApplicationClass();
app.Application.Workbooks.Add(true);
Workbook book = (Workbook)app.ActiveWorkbook;
Worksheet sheet = (Worksheet)book.ActiveSheet;
Range r = sheet.get_Range("A1", "C1");
//獲取行數
object[,] objectData = new object[65535, 3];
while (!string.IsNullOrEmpty(strLine))
{
string[] tempArr;
tempArr = strLine.Split(',');
for (int k = 1; k <= tempArr.Length; k++)
{
objectData[rowNum-1, k-1] = tempArr[k - 1];
}
strLine = sr.ReadLine();
rowNum++;
}
r = r.get_Resize(65535, 3);
r.Value2 = objectData;
r.EntireColumn.AutoFit();
//儲存excel檔案
book.SaveCopyAs("D://source.xls");
//關閉檔案
book.Close(false, missing, missing);
//退出excel
app.Quit();
MessageBox.Show("轉化成功！");
|
看到這裡就結束了嗎？不才剛開始：