Ciao a tutti, ho un piccolo (credo... ) problema:

Ho una cartella di lavoro (workbookA) dove ci sono tre fogli di lavoro (sheetA1, sheetA2 e sheetA3). Nella sheetA1 ho creato un programmino che mi calcola dei dati.

Il problema è il seguente: questo programmino deve copiare nella sheetA3 (o in un altra libera) un altro foglio (sheet B1)su cui sono contenuti dei dati, che appartiene a un'altra cartella di lavoro (workbook B) indipendente da workbookA.

Ho creato un pulsante che dalla workbookA apre il file sheetB1 con i dati che a me interessano, poi crea un foglio di lavoro in SheetA3 con il nome che gli dò io MA non mi copia i dati di sheetB1

Qual è il codice in visual basic che mi permette di fare ciò?

io ho fatto così fino a ora:

Private Sub CommandButton1_Click()

Dim X As String, newsheet As Worksheet
Direct = Application.ThisWorkbook.Path
nome = Range("n3") ' qui c'è il nome del file che mi interessa
If nome = "" Then Exit Sub
X = Direct & "\DATA\" & nome & ".xls"
Workbooks.Open Filename:=X, ReadOnly:=False
Set newsheet = Workbooks(1).Worksheets.Add
newsheet.Name = nome
Workbooks(2).Worksheets(newsheet.Name).Range("a1") .Copy Destination:=Workbooks(1).Worksheets(newsheet.Name ).Range("a1")

End Sub

Grazie!!!

Ps: uso excel 2003 e il visual basic associato.