Risultati da 1 a 11 di 11

Discussione: esporta In Pdf con Range dinamico



  1. #1
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15

    esporta In Pdf con Range dinamico

    Ciao a tutti ........
    In questo file tramite il registratore di macro con il pulsante esporta in pdf creavo un pdf
    però mi sono accorto che dato che la tabella da esportare cambia di lunghezza di righe
    come posso far diventare questa macro dinamica in base alla lunghezza della tabella
    grazie a tutti.......

    https://www.dropbox.com/s/9r6d6xscvy...mana.xlsm?dl=0


    Codice HTML: 
    Sub esporta_in_pdf()
    '
    ' esporta_in_pdf Macro
    '
    
    '
        Range("B2:G24").Select
        Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
            "H:\Aglianese\Calendari gare\torneo Partite del fine settimana.pdf", Quality _
            :=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
            OpenAfterPublish:=True
        Range("B2:G5").Select
    End Sub
    windows 10
    Excel 2016

  2. #2
    L'avatar di rollis13
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Cordenons
    Messaggi
    810
    Versione Office
    2016 64bit
    Likes ricevuti
    143
    Likes dati
    53

    Re: esporta In Pdf con Range dinamico

    Puoi inserire una variabile che ti calcola l'ultima riga inserita nella colonna B (presumo che si tratti del Foglio1) e sfruttarla nella macro. Esempio:
    Codice: 
    Option Explicit
    
    Sub esporta_in_pdf()
    '
    ' esporta_in_pdf Macro
    '
        Dim LR As Long
        
        LR = Range("B" & Rows.Count).End(xlUp).Row
        Range("B2:G" & LR).ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
            "H:\Aglianese\Calendari gare\torneo Partite del fine settimana.pdf", Quality _
            :=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
            OpenAfterPublish:=True
        Range("B2:G5").Select
    
    End Sub
    Ho anche eliminato il Select/Selection dato che in questa situazione è inutile.

  3. #3
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15

    Re: esporta In Pdf con Range dinamico

    Grazie rollis
    faccio delle prove e ti faccio sapere
    Grazie
    windows 10
    Excel 2016

  4. #4
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15

    Re: esporta In Pdf con Range dinamico

    Mi continua a dare sempre errore di debug......
    https://www.dropbox.com/s/9r6d6xscvy...mana.xlsm?dl=0
    windows 10
    Excel 2016

  5. #5
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3334
    Versione Office
    2013 PC
    Likes ricevuti
    481
    Likes dati
    49

    Re: esporta In Pdf con Range dinamico

    Citazione Originariamente Scritto da nick0573 Visualizza Messaggio
    Mi continua a dare sempre errore di debug......
    https://www.dropbox.com/s/9r6d6xscvy...mana.xlsm?dl=0
    Ciao Nick ho eseguito la macro dal tuo file e a me non da alcun errore.
    Sei sicuro del percorso? ci sono le cartelle in cui salvi?

    ciao.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  6. #6
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15

    Re: esporta In Pdf con Range dinamico

    Ciao Baloon.......
    hai eseguito la macro del file che ho allegato io????????
    windows 10
    Excel 2016

  7. #7
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3334
    Versione Office
    2013 PC
    Likes ricevuti
    481
    Likes dati
    49

    Re: esporta In Pdf con Range dinamico

    Citazione Originariamente Scritto da nick0573 Visualizza Messaggio
    Ciao Baloon.......
    hai eseguito la macro del file che ho allegato io????????
    Sì ed era tutto ok

    P.S.
    Naturalmente solo il salvataggio in pdf il resto non l'ho visto.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  8. #8
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3334
    Versione Office
    2013 PC
    Likes ricevuti
    481
    Likes dati
    49

    Re: esporta In Pdf con Range dinamico

    Ho provato le altre macro.
    Se l'errore che dici tu è sull'inserimento, è perchè non ci sono categorie e squadre nel foglio 2; prova a metterne qualcuna e vedrai che il tutto funziona normalmente.

    ciao.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  9. #9
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15

    Re: esporta In Pdf con Range dinamico

    Si hai ragione Baloon

    nel percorso del salvataggio devo cambiare la lettera della periferica da "H".........
    a quello che voglio io


    Grazie ancora
    Baloon e Rollis
    windows 10
    Excel 2016

  10. #10
    L'avatar di rollis13
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Cordenons
    Messaggi
    810
    Versione Office
    2016 64bit
    Likes ricevuti
    143
    Likes dati
    53

    Re: esporta In Pdf con Range dinamico

    Citazione Originariamente Scritto da nick0573 Visualizza Messaggio
    [...]nel percorso del salvataggio devo cambiare la lettera della periferica da "H"... a quello che voglio[...]
    Sinceramente, visto che avevi registrato la macro, davo per certo che quello indicato fosse un percorso attendibile. Anch'io nelle mie prove l'avevo sostituito con un riferimento al mio disco :286:.

  11. #11
    L'avatar di nick0573
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Pistoia
    Età
    47
    Messaggi
    1072
    Versione Office
    Excel 2016
    Likes ricevuti
    19
    Likes dati
    15

    Re: esporta In Pdf con Range dinamico

    si ho capito dopo come funzionava la macro...
    Grazie

    P.s. scusa ma sono piuttosto indietro con il Vba
    windows 10
    Excel 2016

Discussioni Simili

  1. [Tutorial VBA] Range.End() - Range.OffSet() - Come operare sulle tabelle di dati
    Di dracoscrigno nel forum Imparando Excel & VBA - Tutorial di Excel-
    Risposte: 3
    Ultimo Messaggio: 29/03/17, 22:30
  2. [Risolto] Range dinamico
    Di D@nilo nel forum Domande su Excel in generale
    Risposte: 7
    Ultimo Messaggio: 14/01/17, 16:18
  3. esporta file con formule nascoste
    Di nick0573 nel forum Domande su Excel VBA e MACRO
    Risposte: 16
    Ultimo Messaggio: 20/04/16, 14:20
  4. Esporta/Stampa
    Di Riccardo64 nel forum Domande su Excel in generale
    Risposte: 8
    Ultimo Messaggio: 15/04/16, 14:46
  5. stampa range dinamico di più pivot su più fogli
    Di Alessandro nel forum Domande su Excel VBA e MACRO
    Risposte: 9
    Ultimo Messaggio: 29/01/16, 12:32

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •