MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Abrir Tabelas dentro de Sub-formulário

    Compartilhe
    avatar
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 618
    Registrado : 09/11/2012

    [Resolvido]Abrir Tabelas dentro de Sub-formulário

    Mensagem  =>Nois em Seg 19 Set 2016, 12:53 pm

    Bom dia!

    eu procurei bastante mas nao estou achando...

    preciso abrir algumas tabelas em um subformulário (sem criar sub-formulários, abrir a tabela direta)

    meu formulário principal:
    frm_Auxiliar

    Sub-formulário:

    frm_inicio

    tabela para exibir:

    tbl_teste

    Poderia ser algo clicando em um botão tipo

    Forms!frm_Auxiliar!frm_inicio.SourceObject = "tbl_teste"

    ja tentei opentable..etc.


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo... Descanse e tente novamente!
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4405
    Registrado : 15/03/2013

    Re: [Resolvido]Abrir Tabelas dentro de Sub-formulário

    Mensagem  ahteixeira em Seg 19 Set 2016, 3:02 pm

    Olá ML,
    Não sei se é o que pretende, mas veja link abaixo:
    [Você precisa estar registrado e conectado para ver este link.]

    Alternativa seria abrir uma Query (consulta)
    Abraço
    avatar
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 618
    Registrado : 09/11/2012

    Re: [Resolvido]Abrir Tabelas dentro de Sub-formulário

    Mensagem  =>Nois em Seg 19 Set 2016, 4:22 pm

    consegui dessa forma, com o exemplo do forum, o engraçado é que só informo a primeira coluna e o resultado me mostra todas as colunas da tabela

    era o que eu queria mesmo, so fico receoso de ter problema no futuro (função mal escrita)


    Dim strOpcao As String

    strOpcao = "tbl_Placa_Bloqueada"

    On Error Resume Next

    If strOpcao = "tbl_Placa_Bloqueada" Then
    CurrentDb.Execute _
    ( _
    "CREATE TABLE " & strOpcao _
    & "(" _
    & "Placa_bloqueada Varchar(255), " _
    & ")" _
    )
    End If

    DoCmd.Save
    Inicio.SourceObject = "Tabela." & strOpcao
    Me.Refresh


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo... Descanse e tente novamente!

    fabianobilo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 117
    Registrado : 10/09/2012

    Re: Abrir Tabelas dentro de Sub-formulário

    Mensagem  fabianobilo em Seg 19 Set 2016, 4:28 pm

    Cria uma consulta ex: Consulta1

    Depois direciona essa consulta no sub form

    Consulta.Consulta1

    Acho que é isso que você precisa. Imaginei desta forma

    Ou! Pra ser mais efetivo cria uma consulta de "Adição" "Acrescentar". Diria que vai funcionar melhor. Apenas uma dica..

    Fabiano
    avatar
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 618
    Registrado : 09/11/2012

    Re: [Resolvido]Abrir Tabelas dentro de Sub-formulário

    Mensagem  =>Nois em Seg 19 Set 2016, 4:33 pm

    obrigado,

    mas no caso tenho 7 tabelas e quero abrir de maneira simples cada uma sem ter que fazer uma consulta por tabela ou formulário
    para não ficar enchendo meu projeto.


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo... Descanse e tente novamente!
    avatar
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 618
    Registrado : 09/11/2012

    Re: [Resolvido]Abrir Tabelas dentro de Sub-formulário

    Mensagem  =>Nois em Seg 19 Set 2016, 4:52 pm

    simplifiquei mais e funciona



    Dim strOpcao As String

    strOpcao = "tbl_Placa_Bloqueada"

    Inicio.SourceObject = "Tabela." & strOpcao


    ou assim também


    Inicio.SourceObject = "Tabela." & "tbl_Placa_Bloqueada"


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo... Descanse e tente novamente!
    avatar
    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 618
    Registrado : 09/11/2012

    Re: [Resolvido]Abrir Tabelas dentro de Sub-formulário

    Mensagem  =>Nois em Seg 19 Set 2016, 4:58 pm

    resolvido


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo... Descanse e tente novamente!
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4405
    Registrado : 15/03/2013

    Re: [Resolvido]Abrir Tabelas dentro de Sub-formulário

    Mensagem  ahteixeira em Seg 19 Set 2016, 8:29 pm

    Olá a todos,
    Que bom que conseguiu.
    Obrigado pelo retorno, os utilizadores do fórum agradecem.
    Abraço

      Data/hora atual: Ter 26 Set 2017, 7:48 pm