Pergunte aqui

Histórico de revisões [voltar]

clique para ocultar/mostrar a revisão 1
Versão inicial

Fechar Caixa de Diálogo após execução de macro

Galera, criei uma caixa de diálogo com botões que executam macros, mas não consigo fechar a caixa de diálogo após a execução das macros. Como posso fazer isso?

Obrigado

clique para ocultar/mostrar a revisão 2
None

Fechar Caixa de Diálogo após execução de macro

Galera, criei uma caixa de diálogo com botões que executam macros, mas não consigo fechar a caixa de diálogo após a execução das macros. Como posso fazer isso?

Obrigado


Bom dia Grafeno,

Obrigado pela disposição em ajudar, sou iniciante e estou penando um pouco.

Já estou com a variável declarada, mas ele está retornando este erro quando tento abrir a caixa de diálogo

Descrição da imagem

Como proceder?

Abraços

Fechar Caixa de Diálogo após execução de macro

Galera, criei uma caixa de diálogo com botões que executam macros, mas não consigo fechar a caixa de diálogo após a execução das macros. Como posso fazer isso?

Obrigado


Bom dia Grafeno,

Obrigado pela disposição em ajudar, sou iniciante e estou penando um pouco.

Já estou com a variável declarada, mas ele está retornando este erro quando tento abrir a caixa de diálogo

Descrição da imagem

Como proceder?

Abraços

----------- EDIT

Segue o código (o erro persiste)

REM BASIC

Dim oPRESCPROT As Object

Sub ABRIRPROT

DialogLibraries.LoadLibrary("Standard")
'Usando a variável declarada no começo do módulo'
oPRESCPROT = CreateUnoDialog( DialogLibraries.Standard.getByName("PRESCPROT") )

oPRESCPROT.Execute()
oPRESCPROT.Dispose()

End Sub

clique para ocultar/mostrar a revisão 4
None

Fechar Caixa de Diálogo após execução de macro

Galera, criei uma caixa de diálogo com botões que executam macros, mas não consigo fechar a caixa de diálogo após a execução das macros. Como posso fazer isso?

Obrigado


Bom dia Grafeno,

Obrigado pela disposição em ajudar, sou iniciante e estou penando um pouco.

Já estou com a variável declarada, mas ele está retornando este erro quando tento abrir a caixa de diálogo

Descrição da imagem

Como proceder?

Abraços

----------- EDIT

Segue o código (o erro persiste)

REM   *****  BASIC  

*****

Dim oPRESCPROT As Object

Object Sub ABRIRPROT

Sub ABRIRPROT

 DialogLibraries.LoadLibrary("Standard")
 'Usando a variável declarada no começo do módulo'
 oPRESCPROT = CreateUnoDialog( DialogLibraries.Standard.getByName("PRESCPROT") )

 oPRESCPROT.Execute()
 oPRESCPROT.Dispose()
End Sub

End Sub

clique para ocultar/mostrar a revisão 5
Tag alterada

Fechar Caixa de Diálogo após execução de macro

Galera, criei uma caixa de diálogo com botões que executam macros, mas não consigo fechar a caixa de diálogo após a execução das macros. Como posso fazer isso?

Obrigado


Bom dia Grafeno,

Obrigado pela disposição em ajudar, sou iniciante e estou penando um pouco.

Já estou com a variável declarada, mas ele está retornando este erro quando tento abrir a caixa de diálogo

Descrição da imagem

Como proceder?

Abraços

----------- EDIT

Segue o código (o erro persiste)

REM  *****  BASIC  *****

  Dim oPRESCPROT As Object

Sub ABRIRPROT

    DialogLibraries.LoadLibrary("Standard")
    'Usando a variável declarada no começo do módulo'
    oPRESCPROT = CreateUnoDialog( DialogLibraries.Standard.getByName("PRESCPROT") )

    oPRESCPROT.Execute()
    oPRESCPROT.Dispose()
End Sub

Fechar Caixa de Diálogo após execução de macro

Galera, criei uma caixa de diálogo com botões que executam macros, mas não consigo fechar a caixa de diálogo após a execução das macros. Como posso fazer isso?

Obrigado


Bom dia Grafeno,

Obrigado pela disposição em ajudar, sou iniciante e estou penando um pouco.

Já estou com a variável declarada, mas ele está retornando este erro quando tento abrir a caixa de diálogo

Descrição da imagem

Como proceder?

Abraços

----------- EDIT

Segue o código (o erro persiste)

REM  *****  BASIC  *****

  Dim oPRESCPROT As Object

Sub ABRIRPROT

    DialogLibraries.LoadLibrary("Standard")
    'Usando a variável declarada no começo do módulo'
    oPRESCPROT = CreateUnoDialog( DialogLibraries.Standard.getByName("PRESCPROT") )

    oPRESCPROT.Execute()
    oPRESCPROT.Dispose()
End Sub