09-05-13, 10:14 AM
أخي العزيز tecno2012,
وجدت لك هذا الكود في حال كنت تستخدم الـ (DataGridView) لتقوم بعملية الـ (Export), قم بتجربته و أخبرني:
إنتبه الى الكود
و ما يقوم بعمله هذا الكود.
وجدت لك هذا الكود في حال كنت تستخدم الـ (DataGridView) لتقوم بعملية الـ (Export), قم بتجربته و أخبرني:
PHP كود :
Dim excelBook As Excel.Workbook = xlApp.Workbooks.Add
Dim excelWorksheet As Excel.Worksheet = CType(excelBook.Worksheets(1), Excel.Worksheet)
xlApp.Visible = True
rowsTotal = DataGridView1.RowCount - 1
colsTotal = DataGridView1.Columns.Count - 1
With excelWorksheet
.Cells.Select()
.Cells.Delete()
For iC = 0 To colsTotal
.Cells(1, iC + 1).Value = DataGridView1.Columns(iC).HeaderText
Next
For I = 0 To rowsTotal - 1
For j = 0 To colsTotal - 1
.Cells(I + 2, j + 1).value = DataGridView1.Rows(I).Cells(j).Value
Next j
Next I
.Rows("1:1").Font.FontStyle = "Bold"
.Rows("1:1").Font.Size = 10
.Cells.Columns.AutoFit()
.Cells.Select()
.Cells.EntireColumn.AutoFit()
.Cells(1, 1).Select()
End With
إنتبه الى الكود
PHP كود :
.Cells.Columns.AutoFit()

