-
Belgharat.
User deleted
Ciao a Tutti!! vorrei esporvi il mio problema che non so risolvere:
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 della sheetB1 io MA non mi copia i dati di sheetB1 (e a me interessa questo!!)
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!!!
.