Condividi:        

Excel - Macro per salvare foglio in percorso dinamico.

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 per salvare foglio in percorso dinamico.

Postdi gioblabla » 21/09/16 19:45

Ciao a tutti.
sono nuovo del forum e comincio con il salutare tutti, dagli admin agli utenti.
Allora...
Io lavoro molto con excel, e ho sempre la necessità di avere tanti report ordinati per categoria e successivamente per nome.
Ho creato una macro che, partendo da una selezione di righe determinate salva tutto in formato pdf.
Il nome del file nasce da un "concatena di celle" e viene correttamente attribuito.
Il mio problema è quello di far salvare il file pdf in una directory specifica. La directory viene già generata da altra macro (non inclusa in questo codice). Il nome di questa directory è anch'esso Il "concatena Di celle"
La macro
Codice: Seleziona tutto
Sub Stampa_ordine()


    Sheets("S.ordine").Select
    Range("A1:H48").Select
    Dim Path, Nome, MioNome
    Path = "e:_ordine_da_evadere\"
    'Path = Range("A102").Value ' percorso da cella
    Nome = Range("A100").Value ' nome file da cella
    MioNome = Path & "" & Nome & ".pdf"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
     MioNome, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
        :=False, From:=1, To:=1, OpenAfterPublish:=False
   
   End Sub


Per nominare il file ho usato Dim Path
Se utilizzo il codice così com'è funziona correttamente, o meglio salva correttamente il file nella path fissa, con il nome che corrisponde alla cella A100.
Io vorrei che il file fosse salvato in un percorso diverso che corrisponde alla cella A102. Nella cella A102 è proprio indic
ato il percorso ... Esempio "E:_ordine_da_evadere\Cliente 1\Località1\"

Come posso risolvere? dove sbaglio?
Utilizzo Office 2007 e non sono ferratissimo in Vb, ci provo.
Grazie
gioblabla
Newbie
 
Post: 3
Iscritto il: 21/09/16 18:30

Sponsor
 

Re: Excel - Macro per salvare foglio in percorso dinamico.

Postdi Anthony47 » 22/09/16 00:57

Ciao gioblabla, benvenuto nel forum.

L' istruzione Path = Range("A102").Value e' (abbastanza) corretta; quello che potrebbe non essere corretto e' il contenuto di A102; inoltre io eviterei di usare la parola chiave Path per una variabile, usa ad esempio Perc (ecco perche' "abbastanza").
Per evitare incomprensioni inserisci il Drive, il Percorso completo, la "\" finale; es
Codice: Seleziona tutto
Dim Perc, Nome, MioNome
'
'
Perc = "E:\TuoPercorso\"
MioNome = Perc & "" & Nome & ".pdf"

Se non funziona allora spiega che cosa succede quando esegui la ActiveSheet.ExportAsFixedFormat (messaggio di errore? File posizionato in altra directory? Nome file errato?)

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

Re: Excel - Macro per salvare foglio in percorso dinamico.

Postdi gioblabla » 26/09/16 00:07

Grazie per la veloce e precisa risposta.
Domani la provo e ti dirò se funziona.
Grazie
gioblabla
Newbie
 
Post: 3
Iscritto il: 21/09/16 18:30

Re: Excel - Macro per salvare foglio in percorso dinamico.

Postdi gioblabla » 26/09/16 21:33

Ciao Anthony47,
e buona sera a tutti

Il codice funziona. Ho risolto. Grazie!!
anche se devo precisare una cosa. In effetti in un primo momento neanche l'istruzione "perc" non fungeva. allora ho rivisto tutti i collegamenti, ed effettivamente nella cella da cui doveva prendere il percorso, mancavano le Virgolette!!
in ogni caso adesso funziona e fa proprio esattamente quello che voglio.
Grazie grazie!!
gioblabla
Newbie
 
Post: 3
Iscritto il: 21/09/16 18:30


Torna a Applicazioni Office Windows


Topic correlati a "Excel - Macro per salvare foglio in percorso dinamico.":


Chi c’è in linea

Visitano il forum: Nessuno e 68 ospiti