Alle 14:23, mercoledì 28 dicembre 2005, Bernardini Lido ha scritto:
> Con la macro registrata non chiude il documento e tanto meno calc
> senza dare nessun errore
> l' altra macro:
>
> Sub Fine
>     Dim Documento   As Object
>     oDialog2.endExecute()
>     Documento = ThisComponent.CurrentController.Frame
>     Documento.Close(True)
> End Sub
>
> con questa mi appare il seguante messaggio di errore
>
> Errore di Runtime basic
> An exception occurred
> Type:com.sun.star.util.CloseVetoException
> Message:controller disagree....

giustamente il controller non ama essere scavalcato da un frame qualunque :-)

prova così:

Sub Fine
Dim Documento As Object
oDialog2.endExecute()
Documento = ThisComponent
Documento.Close(True)
End Sub

ciao
paolo

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

Rispondere a