MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Excluir Formulário com VBA (Access 2010)

    Access365
    Access365
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 09/07/2012

    [Resolvido]Excluir Formulário com VBA (Access 2010) Empty [Resolvido]Excluir Formulário com VBA (Access 2010)

    Mensagem  Access365 em 2/7/2014, 16:56

    Olá amigos,
    Como faço para excluir um Formulário, usando VBA, de dentro do mesmo banco de dados?

    Obrigado, Luz e Paz!
    chsestrem
    chsestrem
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 463
    Registrado : 01/03/2010

    [Resolvido]Excluir Formulário com VBA (Access 2010) Empty Re: [Resolvido]Excluir Formulário com VBA (Access 2010)

    Mensagem  chsestrem em 2/7/2014, 17:36

    Boa tarde,

    Faço algo assim em um botão ou procedimento

    'Procurar o Nome do formulário na tabela MSysObjects

    If DCount("Name", "MSysObjects", "Name = 'FrmTeste'") > 0 Then

    'Se o formuláo existe mando deletar

    DoCmd.DeleteObject acForm, "FrmTeste"

    End If

    Sds,


    .................................................................................
    Charles Sestrem
    http://www.vbabit.com.br
    Access365
    Access365
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 09/07/2012

    [Resolvido]Excluir Formulário com VBA (Access 2010) Empty Re: [Resolvido]Excluir Formulário com VBA (Access 2010)

    Mensagem  Access365 em 3/7/2014, 14:19

    Obrigado chsestrem, mas não funfou!

    Luz e Paz!
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3633
    Registrado : 29/06/2012

    [Resolvido]Excluir Formulário com VBA (Access 2010) Empty Re: [Resolvido]Excluir Formulário com VBA (Access 2010)

    Mensagem  Noobezinho em 3/7/2014, 14:47

    Paulo

    Funfou perfeitamente.

    Atente para:

    Você não pode apagar o mesmo formulário onde está o botão.

    No código, você tem que substituir em dois lugares onde está escrito
    FrmTeste pelo nome do Formulário que quer excluir.

    Abraços

    Noob
    Access365
    Access365
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 09/07/2012

    [Resolvido]Excluir Formulário com VBA (Access 2010) Empty Re: [Resolvido]Excluir Formulário com VBA (Access 2010)

    Mensagem  Access365 em 3/7/2014, 16:07

    Olá Noobezinho,
    O código será executado por uma macro logo após o fechamento deste Form.
    Coloquei o código no módulo (como está descrito abaixo), mas não funfa!
    ===== MÓDULO =====

    Option Compare Database
    Option Explicit

    Public Function DeleteForm()
    If DCount("Name", "MSysObjects", "Name = 'ocultar'") > 0 Then
    'Se o formuláo existe mando deletar
    DoCmd.DeleteObject acForm, "ocultar"
    End If
    End Function

    ================

    ===== MACRO =====

    ExecutarCódigo
    Nome da função: DeleteForm

    ===============

    Obrigado, Luz e Paz!
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3633
    Registrado : 29/06/2012

    [Resolvido]Excluir Formulário com VBA (Access 2010) Empty Re: [Resolvido]Excluir Formulário com VBA (Access 2010)

    Mensagem  Noobezinho em 3/7/2014, 17:28

    Paulo


    Na macro, coloque assim:

    Nome da função: DeleteForm()


    Noob
    Access365
    Access365
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 09/07/2012

    [Resolvido]Excluir Formulário com VBA (Access 2010) Empty Re: [Resolvido]Excluir Formulário com VBA (Access 2010)

    Mensagem  Access365 em 3/7/2014, 18:56

    Ainda não funfou...
    Tá falando que o Form tá aberto, mas a macro o fecha antes, assim:

    ===== MACRO Ocultar =====
    FecharJanela
    Tipo de objeto: Formulário
    Nome do objeto: Ocultar
    (...)
    ExecutarCódigo
    Nome da função: DeleteForm()
    ===============

    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3633
    Registrado : 29/06/2012

    [Resolvido]Excluir Formulário com VBA (Access 2010) Empty Re: [Resolvido]Excluir Formulário com VBA (Access 2010)

    Mensagem  Noobezinho em 3/7/2014, 19:18

    Funcionando pefeitamente.

    Confira o nome do formulário, na macro e no código.

    Noob
    Access365
    Access365
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 09/07/2012

    [Resolvido]Excluir Formulário com VBA (Access 2010) Empty Re: [Resolvido]Excluir Formulário com VBA (Access 2010)

    Mensagem  Access365 em 2/8/2020, 18:42

    Noobenzinho estava correto.... Havia resíduo de comando na macro que impedia o funcionamento correto... retirei e resolveu!.

      Data/hora atual: 10/8/2020, 06:08