[VBA] ado excel select

[mich19]

Ciao a tutti

ho 2 file excel dal primo voglio aprire il secondo con ADO, effettuare un select e avere poi i dati a disposizione x elaborarli e inserirli nel secondo...

parto da questa situazione:

Private Sub CommandButton1_Click()   
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
With cn     .Provider = "Microsoft.Jet.OLEDB.4.0"     .ConnectionString = "Data Source=C:\Users\Michele\Desktop\max\Nuova cartella\libro giornale 2009 Pictet mandati 4 5 6.xls;" & _ "Extended Properties=Excel 8.0;"     .Open 

End With                   

strQuery = "SELECT * FROM MF4"      
End Sub 

dove MF4 è il foglio di lavoro...

scusate ho cercato ovunque ma non ci sono riuscito..

dovrei fare un select e avere a disposizione valore per valore...

grazie.. michele