Alle 02:48, domenica 8 gennaio 2006, Bart Aimar ha scritto:
> Ci ho messo una pezza... anche se mi sembra strano che sia necessario
> distruggere tutte le aree di stampa esistenti sul docucumento...
Io le ho eliminate tutte a mano con Formato -> Aree di Stampa -> Rimuovi
poi, finito di stampare rimuovo l' area selezionata con
....
oSheet.getActiveSheet().setPrintAreas(Array()) '(Questo mi ero dimenticato di
'
metterlo nella tua macro)
....
come hai fatto tu per tutti i fogli (For ... Next)
Il tuo metodo è più sicuro, perchè una volta impostata un' area di stampa
questa viene salvata, credo, nelle impostazioni di OO se non rimossa prima
Facendo piazza pulita di tutte le aree di stampa, prima di selezionarne una,
siamo sicuri di non stampare o salvare parti dei fogli non richiesti
> REM INIZIO CODICE
> Sub esporta_fattura_in_pdf_
> ' si rende necessario cancellare prima tutte le aree
> ' di stampa esistenti sula Worksheet
> ' Quindi, dopo aver passato questa macro, l'unica area di stampa
> ' sarà solo quella definita nel nostro range qui sotto...
> Dim selArea(0) as new com.sun.star.table.CellRangeAddress
> Dim sCartella As String
> Dim oName as string
> Dim oMycell as object
> Dim oDoc as object
> Dim oCell as object
> Dim oNumero as string
> Dim oSheet as object
> Dim oSheets
> Dim i%
> oDoc = Thiscomponent
> oSheets = ThisComponent.Sheets ' enumeta le sheets
> For i = 0 to oSheets.getCount() - 1
> oSheet = ThisComponent.Sheets.getByIndex(i)
> oSheet.setPrintareas(array()) ' e su caduna cancella
> Next ' le aree di stampa
> oNomeSheet = odoc.currentcontroller.activesheet.name
> selArea(0).StartColumn = nStC
> selArea(0).StartRow = nStR
> selArea(0).EndColumn = nEndC
> selArea(0).EndRow = nEndR
> oSheet=ThisComponent.Sheets.getByName(oNomeSheet)
> oSheet.setPrintareas(selArea())
Vedo che hai usato due modi diversi per cancellare e selezionare
l' area ( oSheet.setPrintareas(array()) e oSheet.setPrintareas(selArea()) )
Qualcuno potrebbe dire cosa hanno di diverso
Penso che con il secondo non si possa cancellare l' area di stampa
perche anche impostando a 0 tutti gli elementi dell' array selArea()
verrebbe selezionata la prima cella (ho provato)
Ciao Lido
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
