5

我正在创建一个小型应用程序，它读取制表符分隔的文本文件，进行一些更改，然后创建一个 Excel 2007 .xlsx 文件。我无法弄清楚如何从字符串数组中获取行并将它们写入 Excel 文件，使用制表符将行分成列。我希望这是有道理的。

我有string Lines[]包含这样的东西：

Item1\tItem2\tItem3\tItem4
ItemA\tItemB\tItemC\tItemD
Item5\tItem6\tItem7\tItem8

我想创建一个如下所示的 Excel 文件：

A      B      C      D
Item1  Item2  Item3  Item4
ItemA  ItemB  ItemC  ItemD
Item5  Item6  Item7  Item8

我尝试了以下方法，但它只是将第一行Lines[]放入每一行，而不是分成列：

string Lines[] = GetLines();

Excel.Application xlApp;
Excel.Workbook xlWb;
Excel.Worksheet xlWs;
object misValue = System.Reflection.Missing.Value;

xlApp = new Excel.Application();
xlWb = xlApp.Workbooks.Add(misValue);
xlWs = (Excel.Worksheet)xlWb.Worksheets.get_Item(1);

Excel.Range c1 = (Excel.Range)xlWs.Cells[2, 1];
Excel.Range c2 = (Excel.Range)xlWs.Cells[2 + lines.Length, 1];

Excel.Range range = xlWs.get_Range(c1, c2);

range.Value = lines;
range.TextToColumns(                 
    range,
    Microsoft.Office.Interop.Excel.XlTextParsingType.xlDelimited,
    Microsoft.Office.Interop.Excel.XlTextQualifier.xlTextQualifierNone,
    false,
    true    // This is flag to say it is tab delimited
);

xlApp.Visible = true;

任何意见，将不胜感激！谢谢！

这是我目前得到的输出：

A                           B    C    D
Item1\tItem2\tItem3\tItem4
Item1\tItem2\tItem3\tItem4
Item1\tItem2\tItem3\tItem4

编辑：我已经用@jiverson 的建议更新了我的代码，并且该行现在在 Excel 中分为列，但第一行Lines[]仍然出现在 Excel 的每一行中。为什么？

编辑#2：这是更新的工作代码：

Excel.Application xlApp;
Excel.Workbook xlWb;
Excel.Worksheet xlWs;
object misValue = System.Reflection.Missing.Value;

xlApp = new Excel.Application();
xlWb = xlApp.Workbooks.Add(misValue);
xlWs = (Excel.Worksheet)xlWb.Worksheets.get_Item(1);

int currentRow = 2;

string[] lines = GetLines();

for (int i = 0; i < lines.Length; i++)
{
    string line = lines[i]; //get the current line

    string[] values = line.Split('\t'); //split the line at the tabs

    //
    // .. i do some things to specific values here ..
    //

    lines[i] = String.Join("\t", values); //put the updated line back together

    Excel.Range currentRange = (Excel.Range)xlWs.Cells[currentRow, 1]; //get the next row

    currentRange.Value = lines[i];  //write the line to Excel

    currentRow++;
}

Excel.Range c1 = (Excel.Range)xlWs.Cells[2, 1]; //get the first cell
Excel.Range c2 = (Excel.Range)xlWs.Cells[2 + lines.Length, 1]; //get the last cell

Excel.Range range = xlWs.get_Range(c1, c2);  //set the range as the used area

range.TextToColumns( //split the row into columns
    range,
    Excel.XlTextParsingType.xlDelimited,
    Excel.XlTextQualifier.xlTextQualifierNone,
    false,
    true    // This is flag to say it is tab delimited
);
4

5 回答 5

2

循环添加每一行，然后在设置范围值后使用文本到列：

    for (int i = 0; i < range.Rows.Count; i++) {
        range.Rows[i].Value = lines[i];
        range.Rows[i].TextToColumns(
            range.Rows[i],
            Microsoft.Office.Interop.Excel.XlTextParsingType.xlDelimited,
            Microsoft.Office.Interop.Excel.XlTextQualifier.xlTextQualifierNone,
            false,
            true
        );          
    }

MSDN 参考

于 2013-07-25T17:03:45.940 回答
1

您可能对使用 Excel 的Text to Columns功能感兴趣，该功能对于大型数据集更有效，而不是循环遍历单元格。

以下是一个 Excel 录制的宏，您可以调整它以从 C# 运行。我首先转换\t为~，但它可能是其他字符。

Sub Macro1()
    Selection.Replace What:="\t", Replacement:="~", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
        :="~", FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1)), _
        TrailingMinusNumbers:=True
End Sub

修改为从 C# 工作可能有点棘手，但了解此选项很有用。

于 2013-07-25T17:06:10.247 回答
1

lines[]您可以使用选项卡拆分每个字符串，'\t'然后将每个值写入相应的单元格。这是一个可以帮助您入门的示例：

 for(int i = 0; i < lines.Length; i++)
   {
       String line = lines[i];

       Excel.Range c1 = (Excel.Range)xlWs.Cells[i+1, 1];
       Excel.Range c2 = (Excel.Range)xlWs.Cells[i+1, 1 + line.Length];
       Excel.Range range = xlWs.get_Range(c1, c2);
       string[] split = line.Split('\t');
       for (int c = 1; c <= split.Length; c++)
       {
          range.Cells[1, c] = split[c-1];
       }
   }
于 2013-07-25T17:02:49.850 回答
1

这可能会对您有所帮助。我创建 excel 文件的方式是从文件中读取字符串并发送数据消息，然后分隔,并另存为.csv文件。

可能在您的情况下尝试将 替换为\t，,然后尝试创建文件。

这段代码可能会给你一个想法。不过我还没有测试过。

1               string filePath = @"C:\test.csv";  
2               string delimiter = ",";  
3    
4               string[][] output = new string[][]{  
5                   new string[]{"Col 1 Row 1", "Col 2 Row 1", "Col 3 Row 1"},  
6                   new string[]{"Col1 Row 2", "Col2 Row 2", "Col3 Row 2"}  
7               };  
8               int length = output.GetLength(0);  
9               StringBuilder sb = new StringBuilder();  
10              for (int index = 0; index < length; index++)  
11                  sb.AppendLine(string.Join(delimiter, output[index]));  
12   
13              File.WriteAllText(filePath, sb.ToString());
于 2013-07-25T16:44:52.440 回答
0

我发现更简单且错误更少的方法是将值简单地写入.csv文件，然后在 Excel 中打开它。

 public static void WriteToCvs<T>(this T[,] array, string fileName)
 {
     using (var stream = File.CreateText(fileName))
     {
         for (int i = 0; i < array.GetLength(0); i++)
         {
             var values = new List<T>();

             for (int j = 0; j < array.GetLength(1); j++)
             {
                 values.Add(array[i, j]);
             }

             stream.WriteLine(string.Join(",", values));
         }
     }
 }
于 2018-10-19T12:31:53.293 回答