Tempo fa domandavo:

Avrei bisogno di impostare lo zom di una schermata,

Il mio problema è impostare le proprietà di VisibleArea a specifici valori per far si che un determinato range coincida con l'area dello schermo disponibile.

C'è un modo per aggirare il problema senza fare complessi calcoli sugli zoom?

Nelle more di una vostra gradita risposta sono andato a questuare sulla lista dove parlano ostrogoto...

Strano... ma qualcuno, malgrado tutto, mi ha capito... e Niklas Nebel con quattro righe (illuminanti) mi ha consentito di risolvere brillantemente il problema.

Ora, che vi piaccia o meno, ho deciso di condividere con voi la soluzione! :-)

Ciao

Bart
------------------------
Sub Main
oSheet = ThisComponent.Sheets.getByName(_
ThisComponent.currentcontroller.activesheet.name)
' il range con cui vuoi riempire lo schermo
orange = oSheet.getCellRangeByPosition(0,0,15,37)
oContr = ThisComponent.CurrentController

'questo il perno della soluzione
oContr.select(oRange)
oContr.ZoomType=OPTIMAL

oContr.select (oSheet.getCellByPosition(0,0))
end sub

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Rispondere a