Creare una VBA che copia i file [Chiuso]

Segnala
Posti
1
Data di registrazione
venerdì 26 maggio 2017
Stato
Membri
Ultimo intervento
venerdì 26 maggio 2017
-
Dovrei creare un VBA che copia le pagine del mio workbook "opera" e "cruscotto" nello stesso workbook con il nome "opera (2)" e "cruscotto (2)".
il problema è che quando copio gli sheets le formule di collegamento tra "opera" e "scruscotto" dovrebbe parlare tra "opera (2)" e "cruscotto (2)" invece per ora le formule in "opera (2)" sono collegate a "cruscotto"

vi incollo il codice che ho scritto sperando che mi potete aiutare

Sub numero_part()
'dichiaro le variabili
Dim sh1 As Worksheet

'metto i riferimenti ai fogli
Set sh1 = Worksheets("opera")

' copy the sheet
sh1.Copy After:=Sheets(Sheets.Count)

sh1.Cells(2, 2) = sh1.Next.Name
'Sheets(i).Cells(1, 2) = Sheets(i).Name


End Sub