[salamandal]

(03-08-24, 09:27 PM)alachk كتب : اشكرك zazasami
ولكن لدي استفسار
هل من الممكن جلب بيانات ملف اكسل الى DataTable  ومن DataTable اعرض اما اريد من البيانات في  DataGridView  مثل جلب بيانات من قاعدة اكسيس
ارفقت ملف مثال على ما اريد لكن يظهر جميع محتوى ملف الاكسل اذا امكن تعديل الكود كي اتحكم بعرض بعض البيانات في DataGridView وشكرا لك

يمكنك تخصيص ذلك من خلال جملة الاستعلام التي اتصلت بها مع ملف الاكسل مع وضع الاعمدة المطلوبة بين عارضتين []

كود :

Imports System.Data
Imports System.Data.OleDb
Public Class Form1

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       If ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
           DataGridView1.DataSource = Nothing
           'DataGridView1.Columns.Clear()
           Dim path As String = ofd.FileName
           Dim con As New OleDbConnection("Provider=Microsoft.ace.oledb.12.0;data source=" & path & ";Extended Properties=Excel 12.0;")
           Dim da As New OleDbDataAdapter("select [الصنف],[الكمية],[السعر] from [Sheet1$] where [السعر] >=100", con)
           Dim dt As New DataTable
           da.Fill(dt)

           DataGridView1.DataSource = dt
       End If
   End Sub
End Class