Devo elencare i nomi di tutte le tabelle di un DB. Esiste un array con un nome specifico? Queste poche righe mi danno errore alla seconda riga.

Set Databeis = CreateObject("ADODB.Connection")
Databeis.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0; DATA SOURCE=C:\WILLY.MDB"
MsgBox (Databeis.TableDefs(2).Name)
Databeis.Close
Set Databeis = Nothing