Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Excel salva con nome da macro

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Excel salva con nome da macro

Postdi wallace&gromit » 22/01/19 16:44

Ciao, con questa macro riesco correttamente ad aprire un modello di file che mi serve e salvarlo con il nome "Nuova.xlsm".
Riesco anche a fare apparire la finestra di dialogo salva con nome, in modo da salvare con il nome scelto dall'utente, ma quest'ultimo passaggio non funziona, la finestra si chiude e rimango con il file aperto che si chiama ancora "Nuova".

Codice: Seleziona tutto
Sub ApriModello()
perc1 = "I:\PROGRAMMI UFFICIO\4 - Fatturazione\Fatture emesse\"
perc2 = "I:\PROGRAMMI UFFICIO\4 - Fatturazione\Modelli\"

If Range("J4") <> "Modello non disponibile" Then
fileN = perc2 & Range("J4") & ".xlsm"
Workbooks.Open fileN
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs (perc1 & "Nuova.xlsm")
Application.DisplayAlerts = True

With Application.FileDialog(msoFileDialogSaveAs)
.InitialFileName = perc1
.Show
End With

End If
End Sub
Office2016 + 2019 su win10
Avatar utente
wallace&gromit
Utente Senior
 
Post: 2056
Iscritto il: 16/01/12 14:21

Sponsor
 

Re: Excel salva con nome da macro

Postdi Anthony47 » 22/01/19 22:38

Ma infatti questi Dialogues consentono solo di scegliere o impostare un percorso+nome, non eseguono nessuna operazione di Apri o Salva; che va fatta poi usando la selezione ottenuta, tipo:
Codice: Seleziona tutto
    If .SelectedItems.Count = 0 Then
         MsgBox ("Nessuna voce selezionata, procedura annullata")
         Exit Sub
    End If
    FullNome = .SelectedItems(1)     'Directory e Nome del file selezionato
End With

In questo modo la variabile FullNome conterra' percorso e nome impostato, e potrai usarlo in un comando di salvataggio.

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 17662
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Excel salva con nome da macro

Postdi wallace&gromit » 24/01/19 08:49

Acc... e sì che di esempi corretti ne avevo! grazie mille
Office2016 + 2019 su win10
Avatar utente
wallace&gromit
Utente Senior
 
Post: 2056
Iscritto il: 16/01/12 14:21

Re: Excel salva con nome da macro

Postdi klingklang » 24/01/19 11:29

All'inizio usavo anch'io FileDialog, poi mi sono convertito a GetSaveAsFileName... è più semplice da gestire e ha meno problemi di compatibilità con Mac. Ma si raggiunge in ogni caso lo stesso risultato (una stringa che contiene il percorso del file da salvare)
Enrico
Windows 7 + Office 2016 64bit / Windows 10 + Office 365 32/64bit
Avatar utente
klingklang
Utente Junior
 
Post: 97
Iscritto il: 23/11/18 15:01
Località: San Giovanni in Persiceto

Re: Excel salva con nome da macro

Postdi wallace&gromit » 25/01/19 17:57

sì, hai ragione Enrico: GetSaveAsFileName sembra una soluzione interessante, per esempio permette anche di già filtrare per file xlsm, come voglio io, ci devo ancora lavorare, ma la strada può essere quella.
Office2016 + 2019 su win10
Avatar utente
wallace&gromit
Utente Senior
 
Post: 2056
Iscritto il: 16/01/12 14:21

Re: Excel salva con nome da macro

Postdi Anthony47 » 26/01/19 02:05

Se si parla di semplificazione allora si potrebbe andare su Application.Dialogues che puo' presentare tutte (tutte?) le finestre di dialogo di Excel; es
Codice: Seleziona tutto
nFile = "C:\Percorso\NuovaCopia.xlsx"          ' Opzionale, diventa il nome file di default
rFlag = Application.Dialogs(xlDialogSaveAs).Show(nFile)

A conclusione del comando il file risulta gia' salvato col nome contenuto in nFile (o comunque scelto dall'utente tramite la finestra di dialogo), ed e' possibile impostare (da codice o per scelta sul dialog box) vari parametri (es una password di apertura file)
La variabile rFlag conterra' True /False a seconda che l'operazione si sia conclusa correttamente o no.

Ci sono centinaia di Dialogs disponibili con propri parametri, vedi alla voce "Elenchi degli argomenti delle finestre di dialogo incorporate"

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 17662
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Excel salva con nome da macro":


Chi c’è in linea

Visitano il forum: raimea e 42 ospiti