删除数据表中的列

时间:2010-03-11 13:39:03

标签: c# excel excel-vba vba

我正在成功地将数据表导出到Excel工作表...在那个Excel工作表中,我必须显示除最后一列之外的数据表的列(customerid,Productname,referenceno)....现在我该如何显示excel中的数据表没有显示最后一列(referenceno)...

任何人都告诉我这个问题的解决方案.. 在此先感谢..

这是我的excel数据库导出代码:

         System.Data.DataTable dt = clsobj.convert_datagrid_orderlist_to_datatable(dvgorderlist, txtreferenceno);

        oxl = new Excel.Application();
        oxl.Visible = true;
        oxl.DisplayAlerts = false;

        wbook = oxl.Workbooks.Add(XlWBATemplate.xlWBATWorksheet);
        oxl.ActiveCell.set_Item(2, 4, "Alfa Aesar");

        wsheet = (Excel.Worksheet)wbook.ActiveSheet;

        wsheet.Name = "Customers";
        Excel.Range range = wsheet.get_Range("A6", "H6");

        wsheet.get_Range("A6", "H6").Font.Name = "Times new Roman";
        wsheet.get_Range("A6", "H6").Font.Size = 12;
        wsheet.get_Range("A6", "H6").Interior.Color = ConvertColour(Color.SkyBlue);

        oxl.ActiveWindow.DisplayGridlines = false;

        int rowCount = 5;
        foreach (DataRow dr in dt.Rows)
        {
            rowCount += 1;
            for (int i = 1; i < dt.Columns.Count + 1; i++)
            {
                // Add the header the first time through
                if (rowCount == 7)
                {
                    wsheet.Cells[6, i] = dt.Columns[i - 1].ColumnName;

                }
                wsheet.Cells[rowCount, i] = dr[i - 1].ToString();
                Excel.Range cellRange = (Range)wsheet.Cells[rowCount, i];
                //cellRange.Interior.Color = 200;
                //cellRange.Interior.Color = ConvertColour(Color.LightBlue);
                cellRange.Cells.Borders.LineStyle = BorderStyle.FixedSingle;
            }


        }

        cells = wsheet.get_Range(wsheet.Cells[2, 2],
                      wsheet.Cells[rowCount, dt.Columns.Count]);
        cells.EntireColumn.AutoFit();


        wsheet = null;
        cells = null;

5 个答案:

答案 0 :(得分:3)

在for语句中更改此行

 for (int i = 1; i < dt.Columns.Count + 1; i++)

这一个

var filteredColumns = dt.Columns.OfType<DataColumn>()
         .Where( x=> x.ColumnName != "referenceno" );
              foreach (var column in filteredColumns )
{
     //do whatever you want 
             //if you need the index you can create counter and increase it by 1 each loop 
}

不要忘记使用linq

using System.Linq ;

答案 1 :(得分:1)

你试过吗

dt.Columns.Remove[dt.Columns.Count - 1];

答案 2 :(得分:1)

foreach (DataColumn dc in dt.Columns)
{
    bool deleteIt = true;
    foreach (StringDictionary sd in sdArray)
    {
        if (dc.ColumnName.Equals(sd["Name"]))
            deleteIt = false;
    }
    if (deleteIt)
        data.Columns.Remove(dc);
}

sdArray包含Excel工作表中所需的所有列。如果您愿意,可以使用普通string[]代替。我使用了StringDictionaries数组,因为每行有更多信息,例如宽度。

Linq对于这类任务也非常棒,但上面的例子只支持一行。所以我认为我们需要一些多样性。

答案 3 :(得分:0)

尝试Worksheet.get_Range("rangeVal", "rangeVal").EntireColumn.Hidden = true;

答案 4 :(得分:0)

dt.Columns.Remove [ColumnIndex];

或者

dt.Columns.Remove [ “的ColumnName”];

尝试任何......