[m.n.hakami]

عندي فورم عملته لاستيراد بيانات من الاكسل والكود صحيح 100% لكن لا اعلم الخطأ بسبب نسخة الاكسل ام نوع النظام باضع لكم الكود 

كود :

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

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       ofd.Filter = "Excel 2013|*.xlsm"
       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 ds As New DataSet
           Dim da As New OleDbDataAdapter("select * from [SPEED$]", Conn)
           da.Fill(ds, "[speed$]")
           grd.DataSource = ds.Tables("SPEED$]")
       Else
       End If

   End Sub

   Private Sub ofd_FileOk(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles ofd.FileOk

   End Sub
End Class

النظام عندي 64 والاوفيس 64 ما ادري فين المشكله 

---

التطبيق
  inport from excel.zip (الحجم : 16.49 ك ب / التحميلات : 40)