Hello,
i use this code to import xls file in access
Sub ImportXLS()
' importeer xls bestand
Dim WrksheetName As String
Dim i As Integer
Dim xl As Object
Set xl = CreateObject("Excel.Application")
xl.Visible = True
xl.Workbooks.Open "C:\david\axor\01-mavo2409.xlsx"
With xl
.Visible = True...