السلام عليكم
طبقت درسا للاخ احمد النجار في موضوع استراد بيانت من ملف الاكسل الى DataGridView
و اردت استراد بيانات الاكسل ولكن بدون استراد العنوان فهل هناك امكانية للتعديل على هذا الملف
وعليكم السلام ورحمة الله وبركاته
اهلاً بك اخى كريم جودي
حتى تقوم بتجنب ذلك
كل ما عليك استبدال كود الزر كاملاً بهذا الكود
كود :
Dim row As String()
ofd.Filter = "Excel 2007|*.xlsx|Excel 2003|*.xls"
If ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
grd.DataSource = Nothing
'grd.Columns.Clear()
Dim path As String = ofd.FileName
Dim conn As New OleDbConnection("PROVIDER=MICROSOFT.ACE.OLEDB.12.0;DATA SOURCE=" & path & "; EXTENDED PROPERTIES=EXCEL 12.0;")
Dim dt As New DataTable
Dim da As New OleDbDataAdapter("SELECT * FROM [Sheet1$]", conn)
da.Fill(dt)
'grd.DataSource = dt
For ii As Integer = 0 To dt.Rows.Count - 2
row = New String() {dt(ii)(0).ToString(), dt(ii)(1).ToString()}
grd.Rows.Add(row)
Next
Else
Exit Sub
End If
وبكده تكون حليت المشكلة كاملاً
تحياتى لك
وتمنياتى لك التوفيق
الشكر لله , تم الرد فى الموضوع الاخر
تحياتى لك
وتمنياتى لك التوفيق