macro che salva in PDF ma con il nome di celle

Versione Completa   Stampa   Cerca   Utenti   Iscriviti     Condividi : FacebookTwitter
giampag
00sabato 9 aprile 2016 08:08
Buona giornata a tutti

Chiedo aiuto per favore per realizzare una macro che deve salvare in PDF un range di in foglio excel 2010 inserendo come nome del file da salvare i dati di celle AC3 e AC4 e Y4

Il file in questione è composto di 3 fogli pertanto dovrò dire alla macro che salvi in PDF di foglio2 con il nome di celle AC3, AC4, Y4

Ho già inziato a registrare il percorso e dirgli che deve selezionare il range apposito e che deve salvare in PDF (avendo excel 2010) ma non riesco ad inserire il nome di celle AC3 e AC4 e Y4

grazie come sempre per l'aiuto che potrete donarmi. a presto
(marc63)
00sabato 9 aprile 2016 09:20
Allega un file zippato come esempio

Grazie [SM=x423024]
giampag
00sabato 9 aprile 2016 09:42
macro che salva in PDF ma con il nome di celle
ciao Marc63 grazie del tuo interessamento. Purtroppo il file ha all'interno dati molto complessi ....ma nel frattempo vedo di crearne uno come esempio.

In sostanza devo salvare in PDF una parte di foglio2 e dargli il nome di alcune celle che all'interno hanno i dati di un documento

Ho già facilmente creato la macro con il percorso e il salvataggio in pdf ma non riesco a dirgli che salvi con il nome del documento...comunque provo adesso a creare un esempio
alfrimpa
00sabato 9 aprile 2016 10:05
Ciao Giampag ed un saluto a Marco

Giusto come suggerimento se hai registrato una macro vai nel codice dove dovresti trovare il parametro Filename:=Nome del file.

Supponendo tu voglia salvare il file con il contenuto della cella A1 devi Sostituire "Nome del file" con Range("A1").Value
rollis13
00sabato 9 aprile 2016 10:08
Se hai già provato a registrare la macro ad un certo punto c'è il nome da dare; nel tuo caso dovrai modificare la struttura in qualcosa di simile aggiungendo il riferimento alle 3 celle:

Filename:="PercorsoAttuale" & Range("AC3") & Range("AC4") & Range("Y4") & ".pdf"

Se serve spaziare le 3 celle basta aggiungere & "_" & , od altro carattere ammesso, tra le celle.


Opps, sono andato lungo, un saluto ad alfrimpa
giampag
00sabato 9 aprile 2016 10:18
ringrazio tutti voi per la disponibilità

riporto sotto la macro che ho provato a realizzare con il vostro supporto



ChDir "C:\Users\gp\Desktop"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\gp\Desktop\& Range("AC3") & Range("AC4") & Range("Y4") & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True



ma purtroppo mi si blocca tutto il codice e diventa rosso, dunque sto sbagliando qualcosa
dodo47
00sabato 9 aprile 2016 10:24
Ciao
a naso mancano doppi apici:

"C:\Users\gp\Desktop\" & Range("AC3") & Range("AC4") & Range("Y4") & ".pdf"

saluti
giampag
00sabato 9 aprile 2016 11:49
macro che salva in PDF ma con il nome di celle
ringrazio anche Dodo47 oltre che Rollis13 ed Alfrimpa, ma putroppo ancora non ci sono...provo a realizzare un file e poi lo allego...
giampag
00sabato 9 aprile 2016 12:51
ciao a tutti.

Allego un file preparato come esempio di cosa deve fare il salva PDF con il nome delle celle in foglio2 che, come si vede nell'allegato, deve salvare con il nome della cella AC3 AC4 Y4

ovviamente il percorso della macro ora è secondo il mio pc!!!

vi ringrazio per il tempo che mi dedicherete...
rollis13
00sabato 9 aprile 2016 16:20
Il problema va individuato nel fatto che la cella Y4 è una data e contiene il carattere "/" vietato nei nomi dei file; prima di procedere col salvataggio bisogna convertirlo in un carattere valido es. "-".
Questo è un esempio di come potrebbe essere la stringa del tuo nuovo FileName:

"C:\Users\gp\Desktop\" & Range("AC3") & Range("AC4") & "_" & Format(Range("Y4"), "dd-mm-yyyy") & ".pdf"
giampag
00sabato 9 aprile 2016 16:43
macro che salva in PDF ma con il nome di celle
ciao Rollis13 mille grazie del tuo lavoro, ora funziona benissimo...

vedo ora dove stava il problema

ancora grazie a tutti. a presto
Questa è la versione 'lo-fi' del Forum Per visualizzare la versione completa clicca qui
Tutti gli orari sono GMT+01:00. Adesso sono le 12:50.
Copyright © 2000-2024 FFZ srl - www.freeforumzone.com