Esportare un file excel in PDF con nome da celle

[Goblin76pr]

Ciao ragazzi chiedo a voi perché ho provato più volte ma non ci salto fuori.
Ho creato un file Excel diviso in più fogli di lavoro tra cui "CLIENTI" , "FATTURA" e "PREVENTIVI"

Una volta inseriti i dati nel foglio "CLIENTI", all'interno del foglio "FATTURA" o preventivo basta richiamare il cognome e i dati si compilano. una volta fatto questo avrò
nella cella W7 il cognome,
nella cella AF7 il nome
nella cella D5 la data

Io vorrei creare una Macro che esporti il foglio di lavoro in PDF dandogli il seguente Nome " (DATA) - PREVENTIVO n. - COGNOME NOME" oppure " (DATA) - fattura n. - COGNOME NOME".

per fare questo mi basterebbe che in un unica cella di Excel riuscissi a mettere una dopo l'altra tutte queste informazioni in formato testo magari, dopo di che la mia macro registrerà l'azione "copia" (dalla cella che contiene tutto) e esporta con nome.. poi "incolla" e il gioco è fatto..

io vi chiederei due cose:
1) esiste la possibilità di unire più informazioni contenute in celle diverse in un unica cella del tipo DATA-NUMERO FATTURA COGNOME-NOME? -- da qui in poi dovrei riuscirci
2) il codice di un intera macro che faccia questo?
Grazie

[Dylan666]

Risposta alla domanda 1:
http://office.microsoft.com/it-it/excel ... section=11

[Flash30005]

Ciao Goblin76pr e benvenuto nel Forum

per creare un pdf devi avere installato nel Pc un programma che compili i formati .pdf tipo adobe professional (a pagamento) o pdfcreator (gratuito)
dopodiché fornendo la versione di Excel in tuo possesso possiamo darti un aiuto, se occorre, a creare la macro.

ciao

[Anthony47]

La versione XL2010 consente di creare pdf in modo nativo; non so XL2007; le vecchie versioni (XL2003 e inferiori) richiedono la "stampante virtuale" (tipo pdf creator).
Insomma senza conoscere la versione del programma in uso non si sa che strada prendere...

Ciao a tutti.

[Dylan666]

Se fosse excel 2010 o superiore qui c'è una risposta utile per un caso identico al tuo:

http://forum.chandoo.org/threads/vba-to ... ues.11741/

Codice: Seleziona tutto

Dim fName As String
With Worksheets("My Sheet")
    fName = .Range("A1").Value & .Range("A2").Value & .Range("A3").Value
End With
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
            "C:\My Documents\" & fName, Quality:=xlQualityStandard, _
            IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
 
End Sub

[Anthony47]

L' abbiamo detto anche su pc-facile; ad esempio in queste discussioni:
viewtopic.php?p=557970
viewtopic.php?t=100997#p583723

La prima da' anche una soluzione per l' ambiente XL2003