Numero pagine



  • Numero pagine
    di LucaS. (utente non iscritto) data: 20/12/2013 20:40:04

    Ciao a tutti. Sono ancora qui a chiedere aiuto.
    Sul foglio2 vengono riportati alcuni valori dal foglio1. Una riga dopo l'ultima cella usata viene resa visibile e posizionata un'immagine scelta con dei calcoli (le immagini NON sono copiate da un'altro foglio o caricate da un file, ma sono già presenti sul foglio2 e invisibili). Per evitare di avere l'immagine divisa su due fogli durante la stampa, faccio mettere un'interruzione di pagina dopo l'ultima cella usata. In questo modo però quando le righe sono poche e ci sarebbe lo spazio per stampare un unico foglio viene comunque creato un secondo foglio solo con l'immagine. La mia idea è di contare le pagine prima e dopo aver reso visibile l'mmagine e nel caso i valori fossero differenti posizionare l'interruzione di pagina.
    Per contare le pagine ho trovato

    ExecuteExcel4Macro("GET.DOCUMENT(50,""nomefoglio"")")

    che in effetti conta le pagine ma solo se hanno delle celle occupate. Inserendo un'immagine non viene contata.
    Qualcuno mi sa dare un'istruzione che vada a contare le pagine di stampa comprese di immagini?

    Dettagli:
    le operazioni vengono avviate dal foglio1 con un pulsante che richiama una routine pubblica su un modulo.
    Il foglio2 non deve essere selezionato (un motivo c'è) e questo è il perchè le immagini non le posso copiare da un altro foglio.



  • di LucaS. (utente non iscritto) data: 21/12/2013 21:43:42

    Mi rispondo da solo.
    L'istruzione

    HPageBreaks.Count + 1

    restituisce il numero di pagine andando a contare le interruzioni di pagina orizzontali.
    Per completezza esiste anche

    VPageBreaks.Count + 1

    che invece conta quelle verticali.