Condividi:        

[Excel] macro salvacon

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] macro salvacon

Postdi macio66 » 23/07/13 15:51

Buongiorno a tutti
Avrei bisogno di un aiuto per terminare una macro salvando il file con salva con nome in una directori ben specifica.
Ho usato "Application.Dialogs(xlDialogSaveAs).Show" ma non riesco a dirgli di andare direttamente sulla directori "J:\Barkhausen.
come posso fare?
Grazie
macio66
Utente Senior
 
Post: 147
Iscritto il: 13/06/13 14:59

Sponsor
 

Re: [Excel] macro salvacon

Postdi ricky53 » 23/07/13 16:26

Ciao,
una soluzione alternativa:
Codice: Seleziona tutto
Sub Salva_con_Nome()
    Nome_File = Range("A1") ' In "A1" scrivi il nome del file compresa l'estensione
    Percorso = Range("A2") ' In "A2" scrivi il percorso sul quale salvare il file
    ActiveWorkbook.SaveAs Filename:=Percorso & "\" & Nome_File _
        , FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
End Sub
Dice il vecchio saggio provare e riprovare è l'unica strada per imparare

Più chiara è la vostra spiegazione
Più immediata sarà la nostra soluzione


. . . . . . . . . .
S.O. W10; Office 2003-10-13-16-19
Avatar utente
ricky53
Utente Senior
 
Post: 4565
Iscritto il: 11/04/09 19:29
Località: Italia

Re: [Excel] macro salvacon

Postdi macio66 » 23/07/13 16:53

Il mio problema è che il nome del file non c'è all'interno del file
macio66
Utente Senior
 
Post: 147
Iscritto il: 13/06/13 14:59

Re: [Excel] macro salvacon

Postdi Anthony47 » 24/07/13 00:44

Teoricamente dovresti poter usare
Codice: Seleziona tutto
ChDrive "D:"
ChDir "D:\PIPPO"
Application.Dialogs(xlDialogSaveAs).Show

Oppure
Codice: Seleziona tutto
Application.Dialogs(xlDialogSaveAs).Show ("D:\pippo\*.xls")

(da adattare al tuo drive & path)
ma non sempre il comportamento e' coerente. Pertanto suggerisco l' utilizzo dell' oggetto FileDialog, meglio programmabile; ad esempio:
Codice: Seleziona tutto
With Application.FileDialog(msoFileDialogSaveAs)
    .InitialFileName = "D:\PIPPO\*.xls"     '<<< Personalizzare
    .Show                                   ' Qui si sceglie il path /name
    .Execute                                ' QUI si salva effettivamente
End With

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

Re: [Excel] macro salvacon

Postdi macio66 » 24/07/13 15:05

Ciao
Con l' utilizzo dell' oggetto FileDialog funziona perfettamente grazie
macio66
Utente Senior
 
Post: 147
Iscritto il: 13/06/13 14:59


Torna a Applicazioni Office Windows


Topic correlati a "[Excel] macro salvacon":


Chi c’è in linea

Visitano il forum: raimea e 37 ospiti

cron