Anthony St. John
Casella Postale 38
50041 CALENZANO FI
Italia
Voice & Fax: 0558873228
Cellphone: 3356047381
Blog: www.scribd.com/thewordwarrior
-----Messaggio originale-----
From: [email protected]
Sent: Tuesday, September 06, 2011 2:23 PM
To: [email protected]
Subject: Re: [it-users] stampa pagina corrente con macro
Il 31/08/2011 12.33, Carlo Strata ha scritto:
> Il 31/08/2011 12:14, [email protected] ha scritto:
>> Questa macro la usavo da swriter con OOo per stampare la pagina corrente:
>>
>> Sub PrintCurrentPage
>> Dim oDoc As Object
>> Dim oDocView As Object
>> Dim iCurPage As Integer
>>
>> oDoc = ThisComponent
>> oDocView = oDoc.getCurrentController()
>> iCurPage = oDocView.ViewCursor.Page
>>
>> Dim mPrintOpts(0) As New com.sun.star.beans.PropertyValue
>> mPrintOpts(0).Name = "Pages"
>> mPrintOpts(0).Value = """"& iCurPage& """"
>> oDoc.print(mPrintOpts())
>> End Sub
>>
>> Ho messo un punto di interruzione su oDoc.print(mPrintOpts()),
>> e le variabili di stampa sono cosi' impostate:
>>
>> mPrintOpts(0) = com.sun.star.beans.PropertyValue
>> mPrintOpts(0).Name = "Pages" String
>> mPrintOpts(0).Value = ""47""" Variant/String
>> mPrintOpts(0).State = 0 Long
>>
>> e aveva sempre funzionato, da LibreOffice non piu'.
>>
>> Quando chiedo file->stampa a volte mi dice nel riquadro di stampa:
>> Nessuna pagina
>>
>> richiedendo file->stampa una seconda volta le pagine ci sono,
>> a volte anche prima di usare la macro le pagine da stampare
>> non ci sono, infatti premendo l'icona di stampa tutto il documento
>> non stampa
>> (in questo caso richiedo file->stampa e ricompaiono le pagine).
>>
>>
>> Non riesco a capire cosa non vada...
>> Se qualcuno ha qualche idea...
>>
>> Grazie
>> Beppe
>
> Ciao Beppe,
>
> sarebbe stupendo che, prima di capire se sia da aprire un bug (o se sia
> giĆ aperto in proposito) tu provassi anche con:
>
> - LibreOffice 3.3.4 Final (2011-08-17), Win32, serie 3.3.x, uscita 15 gg
> fa, come vedi;
>
> - LibreOffice 3.4.3 Final (2011-08-31), Win32, serie 3.4.x, uscita oggi,
> come vedi.
>
> E da qui in poi proseguire. Se la prima serie, la 3.3.x, dovesse aver
> risolto il problema, non installare la 3.4.x, per ora, direi. Magari
> testa la 3.4.3 in un altro pc e valuta con attenzione il passaggio non
> mancando, se puoi, di segnalarci, comunque, ogni problema da te riscontrato.
>
> Facci sapere.
>
> Buona giornata,
>
> Carlo
XP Sp3
LibreOffice 3.4.3
OOO340m1 (Build:302)
installato e riprovato: nessun cambiamento.
ciao
Beppe
--
Unsubscribe instructions: E-mail to [email protected]
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/it/users/
All messages sent to this list will be publicly archived and cannot be deleted
--
Unsubscribe instructions: E-mail to [email protected]
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/it/users/
All messages sent to this list will be publicly archived and cannot be deleted