ANTEPRIMA DI STAMPA



  • ANTEPRIMA DI STAMPA
    di RITA (utente non iscritto) data: 19/12/2012 19:06:49

    Ciao a tutti
    pongo un quesito.
    L'istruzione banale qui sotto mi seleziona un foglio e mi va vedere l'anteprima di stampa
    C'e' un modo per far si che una volta selezionato il foglio possa sapere quante pagine ci sono e vedere in anteprima di stampa solo l'ultima
    grazie per l'eventuale collaborazione

     
    SUB ANTEPRIMA()
    FOGLIO1.SELECT
    ACTIVEWINDOW.SELECTEDSHEETS.PRINTPREVIEW
    END SUB
    



  • di Vecchio Frac data: 19/12/2012 20:03:53

    No, temo che non ci siano soluzioni per questo quesito.
    Excel non è Word...
    Quello che puoi fare è giocare con il numero di pagine da visualizzare:
    activesheet.pagesetup.zoom=false
    activesheet.pagesetup.fittopageswide=1
    activesheet.pagesetup.fittopagestall=4
    activesheet.printpreview

    Ma all'anteprima non puoi inviare alcun comando... l'utente deve premere il tasto "Fine" per andare all'ultima pagina.





  • di isy@ (utente non iscritto) data: 19/12/2012 22:24:28

    Hi,

    Citazione: Ma all'anteprima non puoi inviare alcun comando... l'utente deve premere il tasto "Fine" per andare all'ultima pagina.

    Codice:
    Application.SendKeys ("{End}"), True
    ActiveSheet.PrintPreview



  • di Vecchio Frac data: 20/12/2012 08:13:35

    Splendido ^_^
    Avevo provato anch'io naturalmente ma... prima chiedevo l'anteprima, poi con SendKeys inviavo il tasto End (e senza il parametro True). Con esito negativo... ecco perchè la mia affermazione così netta.
    Felice di aver avuto una smentita anche se si conferma che alle volte VBA è proprio controintuitivo.
    Grazie isy@ ^_^





  • di Rita (utente non iscritto) data: 20/12/2012 16:27:57

    Grazie per le risposte, ho privato lIstruzione e funziona ma se è inclusa in una userform non va. Dovrei settare la userform con showmodal false ma poi mi si attivano i fogli sottostante e non va bene. Grazie in ogni caso a tutti e due