Salvare foglio singolo

Hai un problema con Excel?

Nuova discussione

Salvare foglio singolo
di Beppe (utente non iscritto) data: 22/08/2017 12:47:10
Ho una macro, che allego, la quale consente di salvare il file Excel, costituito da tre fogli, denominati "ELENCO", "SINTESI" e "DATI", in una cartella specifica, con un nome specifico (nome del file e cartella di destinazione li prende in automatico dal foglio "DATI").
Il mio problema è che non voglio salvare il file intero, ma solo il foglio denominato "SINTESI". Fatto questo, dovrebbe essere visualizzato, come foglio attivo, il foglio denominato "ELENCO". Come modificare la macro???
Sub SALVAFOGLIOSINTESI() ActiveWorkbook.SaveAs Filename:=Range("Dati!A4") & Range("Dati!A1").Value & "xlsm" End Sub

di patel data: 22/08/2017 14:00:47
prova così
se non funziona allega un file di esempio

Sub SALVAFOGLIOSINTESI()
Sheets("SINTESI").Copy
ActiveWorkbook.SaveAs Filename:=Range("Dati!A4") & Range("Dati!A1").Value & ".xlsx"
ActiveWorkbook.close False
Sheets("ELENCO").Select
End Sub

di Beppe (utente non iscritto) data: 22/08/2017 14:12:32
Ho allegato un file di prova.

di Vecchio Frac data: 22/08/2017 14:23:17
Un'alternativa.

Sub SALVAFOGLIOSINTESI()
dim s as string
    s = Range("Dati!A4") & Range("Dati!A1") 
    thisworkbook.sheets("sintesi").copy
    activeworkbook.SavecopyAs  s & ".xlsx"
    activeworkbook.close
    Sheets("ELENCO").Select
end sub

di Vecchio Frac data: 22/08/2017 14:24:13
E' simile a quella di patel ma a me il solo SaveAs dava problemi così ho usato SaveCopyAs ^_^
di patel data: 22/08/2017 18:46:50
Beppe, quando qualcuno ti propone una soluzione è buona regola rispondere dicendo :
1) funziona, grazie
2) non funziona, mi dà errore in questo punto
3) ????
rispondendo come hai fatto tu dai l'impressione di non voler imparare, ma soltanto di volere la cosiddetta "pappa pronta"
di Beppe (utente non iscritto) data: 22/08/2017 19:34:43
Scusa Patel, ma ero al lavoro e non potevo collegarmi. Ho provato ora: la tua soluzione non funziona, quella di vecchio Frac si; ho solo aggiunto un FALSE dopo il CLOSE, come consigliato da te. Ti ringrazio come ringrazio vecchio Frac per la pazienza e la competenza..
di Vecchio Frac data: 22/08/2017 21:14:14
Anch'io avevo avuto problemi con il solo SaveAs. Presumo che sia dovuto al fatto che il file originale era mantenuto aperto.

Vuoi Approfondire?