我从这个问题中使用:http://support.microsoft.com/kb/302084 从Visual C#导出到excel,我没有任何问题。
要设置单元格边框,我使用以下代码:
oSheet = (Excel._Worksheet)oWB.ActiveSheet;
oSheet.get_Range("A2", "J2").Borders.LineStyle = true;
上面的代码运行良好。
但现在我只想为奇数行设置单元格边框。
因此,出于这个原因,我想使用如下所示的循环:
for(i=1,i<=6,i++)
{
oSheet.get_Range( , ).Borders.LineStyle = true; // only for odd rows.
}
但我不知道我必须如何更改上面的语法,在每个循环中它根据变量进行更改。
要每隔一行,您可以使用步骤 2 重写 for 循环:
for (int i = 1; i <= 6; i+=2) // only for odd rows.
{
string c1 = "A" + i.ToString();
string c2 = "J" + i.ToString();
oSheet.get_Range(c1, c2).Borders.LineStyle = true;
}
C# DataGridView 导出到 Excel :
private void button1_Click(object sender, EventArgs e)
{
string connectionString = "Data Source=.;Initial Catalog=pubs;Integrated Security=True";
string sql = "SELECT * FROM Authors";
SqlConnection connection = new SqlConnection(connectionString);
SqlDataAdapter dataadapter = new SqlDataAdapter(sql, connection);
DataSet ds = new DataSet();
connection.Open();
dataadapter.Fill(ds, "Authors_table");
connection.Close();
dataGridView1.DataSource = ds;
dataGridView1.DataMember = "Authors_table";
}
private void button2_Click(object sender, EventArgs e)
{
Excel.Application xlApp;
Excel.Workbook xlWorkBook;
Excel.Worksheet xlWorkSheet;
object misValue = System.Reflection.Missing.Value;
Int16 i, j;
xlApp = new Excel.ApplicationClass();
xlWorkBook = xlApp.Workbooks.Add(misValue);
xlWorkSheet = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
for (i = 0; i <= dataGridView1.RowCount - 2; i++)
{
for (j = 0; j <= dataGridView1.ColumnCount - 1; j++)
{
xlWorkSheet.Cells[i + 1, j + 1] = dataGridView1[j, i].Value.ToString();
}
}
xlWorkBook.SaveAs(@"c:csharp.net-informations.xls", Excel.XlFileFormat.xlWorkbookNormal, misValue, misValue, misValue, misValue, Excel.XlSaveAsAccessMode.xlExclusive, misValue, misValue, misValue, misValue, misValue);
xlWorkBook.Close(true, misValue, misValue);
xlApp.Quit();
releaseObject(xlWorkSheet);
releaseObject(xlWorkBook);
releaseObject(xlApp);
}
private void releaseObject(object obj)
{
try
{
System.Runtime.InteropServices.Marshal.ReleaseComObject(obj);
obj = null;
}
catch (Exception ex)
{
obj = null;
MessageBox.Show("Exception Occured while releasing object " + ex.ToString());
}
finally
{
GC.Collect();
}
}
导出数据到Excel文件
http://csharp.net-informations.com/excel/csharp-excel-export.htm
正如我在评论中提到的:您只需要检查除以 2 的余数即可找到奇数行或偶数行。
要只为奇数行(即第一行、第三行、第五行等)添加边框线样式,应该执行类似于以下代码的操作:
for(i=1,i<=6,i++)
{
if ((i % 2) == 1)
{
oSheet.get_Range( , ).Borders.LineStyle = true; // only for odd rows.
}
}