Condividi:        

rinominare file pdf da excel

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

rinominare file pdf da excel

Postdi calculon » 25/05/11 07:42

Scusate se ti disturbo ancora, ma sono ancora alle prese con lo stesso problema.

Vorrei provare a risolvere un altro problema che incontro quotidianamente sul lavoro: scaricare e rinominare file pdf.

Pensavo: è possibile con macro aprire un file pdf e rinominarlo sulla base di un elenco in colonna excel?

Che ne so, 123.pdf -----> (a1) = Giovanni ----> per diventare Giovanni.pdf?

Grazie grazie e ancora grazie!
calculon
Utente Senior
 
Post: 161
Iscritto il: 07/01/11 15:08

Sponsor
 

Re: rinominare file pdf da excel

Postdi Anthony47 » 25/05/11 13:44

Potresti sfruttare l' istruzione Name, ad esempio (dall' help on line del vba):
Codice: Seleziona tutto
Perc ="C:\Documents and Settings\NOME_UTENTE\Documenti\"  '<<Da personalizzare
Name (Perc & "123.pdf" As (Perc & Range("A1").value & ".pdf"

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

Re: rinominare file pdf da excel

Postdi calculon » 25/05/11 18:23

Sub rinomina()
Perc = "C:\Users\Giovannino\Desktop" '<<Da personalizzare
Name (Perc & "marameo.pdf") As Perc & Range("A1").Value & ".pdf"
End Sub

errore di run-time "53"
impossibile trovare il file.
calculon
Utente Senior
 
Post: 161
Iscritto il: 07/01/11 15:08

Re: rinominare file pdf da excel

Postdi calculon » 25/05/11 18:47

Sub provarinomina()

Perc = "C:\Users\Gio\Desktop\Via Genova\"
Call FileCopy(Perc & "Palermo.pdf", Perc & "Milano.pdf")
Kill (Perc & "Palermo.pdf")
End Sub

Sono emozionatissimo! è la mia prima Macro funzionanteeee!!!!

Ora vorrei chiedere a questa macro di fare questa operazione su tutte le celle, ossia:
trasforma da a1 ad a2; da b1 a b2, ecc..

Come mi consigliate di procedere?
calculon
Utente Senior
 
Post: 161
Iscritto il: 07/01/11 15:08

Re: rinominare file pdf da excel

Postdi Anthony47 » 25/05/11 20:57

Bravo.
Pero' se guardi bene la tua realizzazione del mio suggerimento, che "Rinomina" e non "Copia" il file, ti puoi risparmiare la Kill; inoltre il mio esempio gia' concatena la Directory con il contenuto di una cella (mentre nel tuo test funzionante hai usato nomi fissi).
Ritornando quindi a quanto ti avevo proposto (che hai realizzato con un paio di inesattezze ben visibili) lo inserirai in un ciclo del tipo For I=1 to 1000 / Next I; qualcosa del tipo
Codice: Seleziona tutto
Perc ="C:\Documents and Settings\NOME_UTENTE\Documenti\"  '<<Da personalizzare rispettando la sintassi
For I=1 to 1000 '<<< 1
If Cells(I,1)="" then exit Sub
Name (Perc & Cells(I,1).value & ".pdf" As (Perc & Cells(I,2).value & ".pdf" '<<<2
Next I

Note:
<<<1: invece di 1000 puoi usare qualsiasi valore che sia certamente superiore ai file elencati; la macro termina quando trova la prima riga vuota in col A.
<<<2: inserisci & ".pdf" se mancante in Ax e Bx

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

Re: rinominare file pdf da excel

Postdi calculon » 25/05/11 21:57

FANTASTICO!!!



Fa davvero piacere pensare che da qualche parte nel mondo ci sia sempre qualcuno pronto a condividere il suo sapere...peraltro senza ricevere nulla in cambio.
Grazie Anthony.
calculon
Utente Senior
 
Post: 161
Iscritto il: 07/01/11 15:08

Re: rinominare file pdf da excel

Postdi ricky53 » 26/05/11 00:03

Ciao,
mi fa molto piacere leggere quanto hai scritto.

Aggiungo, sicuramente interpretando anche il pensiero di Anthony: in cambio si ha "il piacere di essere stati utili a qualcuno" e ... poi ci sono i vostri riscontri !!!
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: rinominare file pdf da excel

Postdi thedregs » 27/05/11 08:43

Qui ho postato la mia soluzione, da profano di exel ho proposto l'uso di un programma di rinomina:
viewtopic.php?f=1&t=91721#p523504
Avatar utente
thedregs
Utente Senior
 
Post: 382
Iscritto il: 31/08/09 18:55

Re: rinominare file pdf da excel

Postdi calculon » 27/05/11 16:40

Grazie anche a te per il tuo suggerimento.
calculon
Utente Senior
 
Post: 161
Iscritto il: 07/01/11 15:08

Re: rinominare file pdf da excel

Postdi calculon » 09/07/11 16:56

Rieccomi anche per le vacanze a rompervi le scatole.


Perc ="C:\Documents and Settings\NOME_UTENTE\Documenti\" '<<Da personalizzare rispettando la sintassi
For I=1 to 1000 '<<< 1
If Cells(I,1)="" then exit Sub
Name (Perc & Cells(I,1).value & ".pdf" As (Perc & Cells(I,2).value & ".pdf" '<<<2
Next I

prendendo spunto da questo comando, vorrei che i miei file venissero rinominati secondo l'ordine cronologico 1,2,3 ecc..
Naturalmente vorrei che i numeri li calcolasse la macchina da sé, senza dover riempire io di volta in volta la colonna Perc & Cells(I,2).value.

Grazieeee
calculon
Utente Senior
 
Post: 161
Iscritto il: 07/01/11 15:08

Re: rinominare file pdf da excel

Postdi Avatar3 » 09/07/11 20:46

ma se vuoi una semplice numerazione è sufficiente modoficare questa riga da così
Codice: Seleziona tutto
Name (Perc & Cells(I,1).value & ".pdf" As (Perc & Cells(I,2).value & ".pdf" '<<<2

Codice: Seleziona tutto
Name (Perc & Cells(I,1).value & ".pdf" As Perc & format(I, "0000") & ".pdf" '<<<2

per avere i file da
0001
0002
a
0999
1000
Per il funzionamento delle macro si deve impostare la protezione a Bassa o Media.
Menu Strumenti -> Macro -> Protezione...
Avatar utente
Avatar3
Utente Senior
 
Post: 569
Iscritto il: 04/04/11 09:04


Torna a Applicazioni Office Windows


Topic correlati a "rinominare file pdf da excel":


Chi c’è in linea

Visitano il forum: Nessuno e 32 ospiti