Copia foglio di lavoro excel con vba

martedì 26 maggio 2009 - 10.17

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

sergino Profilo | Newbie

44 messaggi | Data Invio: mar 26 mag 2009 - 10:17

ciao a tutti,
ho un file excel con vari fogli di lavoro. Dovrei copiare gli ultimi due, che contengono delle formule ricavate da altri fogli di lavoro, in un nuovo file excel che non contenga formule, ma solo i valori

io ho provato

Dim p As String
p = ActiveWorkbook.Path
ActiveSheet.Copy 'crea una nuova cartella
ActiveWorkbook.SaveAs p & "\Cartel2"

ActiveWindow.Close
ActiveWorkbook.Save

e il nuovo file excel viene creato con il foglio di lavoro che devo copiare - però non contiene i valori delle celle con formula, ma contiene sempre le formule.
come posso dire di salvare il foglio di lavoro solo con i valori?

un'altra strada che stavo provando a percorrere è quella

Cells.Select
Selection.Copy
Workbooks.Add

ma così, il nuovo file excel non è formattato come l'originale

grazie mille!

sergio

sergino Profilo | Newbie

44 messaggi | Data Invio: mar 26 mag 2009 - 15:13

ciao, sono riuscito a utilizzare la funzione incolla speciale:

Dim p As String
p = ActiveWorkbook.Path
Cells.Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWorkbook.SaveAs p & "\Cartel2", FileFormat:= _
xlExcel8, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False

ora dovrei sviluppare un pò questo codice: il mio file esempio.xls contiene vari fogli di lavoro: foglio1, foglio2, foglio3, foglio4. Vorrei copiare in un nuovo file, dati.xls, solo foglio3 e foglio4, mantenendo gli stessi nomi

come posso fare?
sergio

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !