Salva con nomi diversi

Hai un problema con Excel?

Salvataggio di un file di Enzo

Volevo chiedervi una cosa,
in una userform alla fine salvo il file con un nome prestabilito e successivamente richiamando la userform alla fine risalva lo stesso file chiedendomi se lo voglio salvare.
la mia domanda e' questa: c'e' la possibilita partendo dall'inizio e richiamando la userform di salvare un file con un nome e succesivamente tutte le volte che richiamo la userform il file venga salvato con nomi diversi senza che io li debba impostare?
esempio banale - richiamo la userform chiudo e il file che utilizzo si salva con il nome "1"
poi tutte le volte che lo richiamo si salvi con "2" o con "3"
etc.

di Mauro

Certo ! parto dall'esempio che ha fatto luca in una delle ultime discussioni.
il metodo saveas non è altro che "salva con nome"
il parametro filename non è altro che una stringa che tu puoi manipolare a tuo piacimento aggiungendo in fondo un contatore che puoi incrementare ogni volta...

ActiveWorkbook.SaveAs Filename:= _
        "d:\Documents and setting \Desktop\nome del tuo file.xls", FileFormat:= _
        xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
        , CreateBackup:=False

di Roberto

Prova in questa maniera, ogni volta che salverai, verrà aggiunta al nome l'ora di salvataggio.

mandi roberto

Sub Macro1()
'
' Macro1 Macro
' Macro registrata il 28/03/2006 da Roberto
'
' Scelta rapida da tastiera: CTRL+r
'
percorso = "F:\T.E" 'il percorso di dove dovresti salvare il file
nome = "foglio" 'nome del foglio
extra = Time & ".xls" 'Nome extra, in questo caso l'ora di salvataggio
nomef = "\" & nome & "_" & extra 'Nome definitivo cioè foglio_ora di salvataggio
ThisWorkbook.SaveAs (percorso & nomef)
End Sub

Vuoi approfondire questo argomento?