hi Antonio,
mayby this will help you out, i used it on WD8 and WD10
//lp_Dir = C:\BRONCODE\BEWEGING_WD10\Exe\Import
// the place for the excell file
lp_Naam = fSelect(lp_Dir, "", "Selecteer het in te lezen xls-bestand" ,...
"Excel bestanden"+TAB+"*.xls"+CR+"Alle bestanden (*.*)"+TAB+"*.*", "", fselOpen+fselExist)
//lp_naam = C:\BRONCODE\BEWEGING_WD10\Exe\Import\test2.xls
IF lp_Naam<>"" AND Lower(Right(lp_Naam, 4))=".xls" THEN
XLS>>Visible = OLETrue //olefalse
XLS>>Workbooks>>Open(lp_Naam)
XLS>>Sheets(3)>>select
//XLS>>Sheets(3) index or by giving the name Sheets("NameSheet")
END
grt Marc :xcool: