Da Access ad Excel

Query da database acces di Roberto

Ciao ragazzi, mi sono messo in testa di estrarre da un database di acces alcuni dati, ho attivato il registratore di macro e da turni.mdb dalla scheda l_01_2006 ho estratto alcuni campi. ora nel file turni.mdb ci sono diverse schede tipo l_02_2006 etc.
vorrei tramite la digitazione su un textbox poter fare la selezione, ho tentato di far la modifica alla macro, ma evidentemente se ora sono quì è perchè non ci sono riuscito, mi date una mano ??
quì sotto il listato della macro.
grazie a tutti e grazie per questo forum.

 With ActiveSheet.QueryTables.Add(Connection:= _
        "ODBC;DSN=Database di Microsoft Access;DBQ=F:\TURNI.mdb;DefaultDir=F:;DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;" _
        , Destination:=Range("A1"))
        .CommandText = Array( _
        "SELECT L_01_2006.MATRICOLA, L_01_2006.NOME, L_01_2006.COGNOME, L_01_2006.COD_TUR_RIPR, L_01_2006.COD_LA, L_01_2006.COD_MA" _
 & Chr(13) & "" & Chr(10) & "FROM `F:\TURNI`.L_01_2006 L_01_2006" _
        )
        .Name = "Query da Database di Microsoft Access"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = True
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .PreserveColumnInfo = True
        .Refresh BackgroundQuery:=False
    End With
End Sub

Ciao di Apoben64

L'uso di una textbox presuppone una userform , oggetto che col registratore non si può operare.
cosa intendi per "selezione" cioè vuoi richiamare dei dati importati dal database e presenti nel foglio od inteargire col database stesso?
cerca di essere più chiaro, anzi se puoi allega un file di esempio , utilizzando la sezione scambio file . un saluto luca

di Roberto

Ciao luca, scusami se sono stato poco chiaro, il textbox1, è contenuto nel userform1, ora io volevo modificare tramite il valore contenuto nel textbox1 il modo di interagire con il database access. la macro che ho fatto con il registratore è una query che mi seleziona dei dati contenuti nella tabella access l_1_2006. all'interno del database access ci sono altre tabelle l_2_2006 etc. ora io vorrei avere la possibilità di interagire con l'eventuale valore scritto nel textbox modificando la macro che prima ho inviato.
spero di essermi spiegato, grazie per essere sempre così presente luca.
ciao roberto

di Mauro

Nella sezione scambio file ho inserito rubrica.mdb (basedati) e rubrica.xls che carica e gestisce i dati di rubrica.mdb prova a vedere se possono tornarti utili!

di Roberto

Ciao mauro, con qualche difficoltà ma sono riuscito a vedere il tuo ottimo lavoro rubrica.xls e mdb.
per il mio livello di apprendimento vba tutto ciò è fuori della mia portata, comunque mi sono stampato il listato e piano piano cercherò di capirci qualche cosa.
non so se hai potuto vedere la macro che ho registrato, comunque è una query che mi permette di importare alcuni dati da un db access.
il mio problema ora è che all'interno del db access, ci sono delle tabelle con nomi diversi. vorrei da un textbox o combobox contenuto in un form poter selezionare le tabelle da cui estrarre i dati.
ti ringrazio per la grande pazienza per il sito e l'ottimo collaboratore "luca".
mandi roberto

di Mauro

Ciao roberto x capirci qualcosa in + sul tema ti consiglio di visionare il corso di approfondimento e scaricarlo dalla sezione downloads.
salutami il friuli
ciao

di Roberto

Grande mauro leggendo il corso avanzato di vba nella sezione collegamenti excel acces il tuo listato di esempio mi ha fatto capire certe cose che prima ingnoravo. mi è bastato adattarlo alle mie esigenze ed ora tutto fila.
in friuli si stà bene vieni a trovarmi
grazie di tutto e per la pazienza.
mandi roberto