Set extwbk = Workbooks.OpenDatabase(Filename:=percorso, CommandText:=Array("STU"), CommandType:=xlCmdTable, ImportDataAs:=xlTable)
Thanks you rorya.
max