Forum di Excel e VBA, per condividere esperienze e risolvere problemi su:
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
Salvare piu fogli
- Hai un problema con Excel?
Salvare piu fogli
di Mauro1975 (utente non iscritto) data: 03/05/2011
Ciao a tutti,
sto creando un codice vba con excel che mi salva un unico foglio,l'ottavo, dei nove presenti e sino a qui ci sono arrivato.ma come posso fare a salvare sia l'ottavo che il nono uniti in un unico file???
Private Sub CommandButton1_Click() Dim NomeDelFile As String Dim NomeDelFile2 As String Dim UserName As String If [a10] = " " Then MsgBox ("ATTENZIONE PRIMA DI SALVARE INSERIRE IL NOME CLIENTE") If [a10] <> " " Then UserName = [a10] NomeDelFile2 = ActiveWorkbook.Path & "Listino da spedire a Monica" & UserName & "__.xls" If [a10] <> " " Then NomeDelFile = ActiveWorkbook.Path & "listini" & UserName & ".xls" If [a10] <> " " Then ActiveWorkbook.SaveAs Filename:=NomeDelFile Worksheets(8).Copy ActiveWorkbook.SaveAs Filename:=NomeDelFile2 ActiveWorkbook.Close End Sub
- Vuoi Approfondire?
