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]Erro de sintexe 3075

    Compartilhe
    avatar
    rpfspawn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 07/09/2016

    [Resolvido]Erro de sintexe 3075

    Mensagem  rpfspawn em Qua 17 Maio 2017, 15:08

    Bom dia,

    Estou com uma dificuldade chata, tenho uma Listbox onde puxo as informações de uma tabela.
    Ao clicar na Listbox eu quero que um formulário se abra no registro selecionado.
    Abaixo o meu código:

    DoCmd.OpenForm "Atendimento", acNormal, , "Código Atendimento=" & "me.list0.columm (0)"

    Mas da erro de sintaxe 3075, alguem pode me ajudar nisso ?



    Desde já agradeço.

    Att,


    Última edição por rpfspawn em Qua 17 Maio 2017, 20:15, editado 1 vez(es)
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 697
    Registrado : 07/12/2011

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  tauron em Qua 17 Maio 2017, 18:47

    DoCmd.OpenForm "Atendimento", acNormal, , "Código Atendimento=" & "me.list0.columm (0)"

    caso a linha acima esteja conforme o seu codigo, tente assim:

    DoCmd.OpenForm "Atendimento", acNormal, , "Código Atendimento=" & "me.list0.column (0)"

    se nao, se puder postar seu bd.
    avatar
    rpfspawn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 07/09/2016

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  rpfspawn em Qua 17 Maio 2017, 20:08

    Agradeço pela ajuda rapida.

    Eu digitei errado o código, esta exatamente assim:

    DoCmd.OpenForm "Atendimento", acNormal, , "Código Atendimento=" & "me.list0.column (0)"

    Mesmo assim continua o erro 3075.

    Aparece isso:

    Erro em tempo de Exacução 3075;

    Erro de Sintaxe (operador faltando) na expressão da consulta 'Código Atendimento =me.list0.column (0)'.
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3672
    Registrado : 20/04/2011

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  Silvio em Qua 17 Maio 2017, 21:12

    Boas...

    Veja esse tópico aqui...mensagem de numero 7, a resposta está lá.

    [Você precisa estar registrado e conectado para ver este link.]


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]
    avatar
    rpfspawn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 07/09/2016

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  rpfspawn em Qua 17 Maio 2017, 21:53

    Vi o link em questão.

    realmente não deu erro 3075 mas o formulário abriu no primeiro registro e não no registro que eu cliquei. veja:

    Private Sub Lista0_Click()
    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "Atendimento"

    stLinkCriteria = "[Código Atendimento]=" & Me![Lista0]

    DoCmd.OpenForm stDocName, , , stLinkCriteria

    End Sub
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  ahteixeira em Qua 17 Maio 2017, 22:08

    Olá a todos,

    Um pitaco a "olho"

    DoCmd.OpenForm "Atendimento", acNormal, , "[Código Atendimento] = " & me.list0.columm (0)

    (É o que dá campos com espaço)
    Evitar acentuaçoes.

    Verifique também se campo é texto (colocar plicas) e a coluna está a correcta.

    Abraço
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3672
    Registrado : 20/04/2011

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  Silvio em Qui 18 Maio 2017, 01:13

    Pegando a " deixa " do Alvaro.


    Nomenclatura sugerida para nomes de:

    tabelas: Tblxxx
    consultas: Qryxxx ou Consxx ou Cnsxxx
    relatórios: Rptxxx ou Relxxx
    formulários: Frmxxx

    Nomenclatura para nomes de campos em tabelas ( TBL )

    1- nunca utilizar
    * palavras com acentos ou separadas: Data Inicio --> DTInicio / Código Atendimento-->IdAtendimento


    That´s all Folks.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]
    avatar
    rpfspawn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 07/09/2016

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  rpfspawn em Qui 18 Maio 2017, 14:00

    ahteixeira bom dia,

    Este banco de dados eu fiz sem conhecimento em VBA.
    Ano passado que eu fiz o curdo de VBA para Access Avançado na Impacta, lá vi tudo isso que voces falaram.
    Porém, neste banco de dados consegui arrumar algumas coisas e outras não por já existirem muitas relações e códigos.
    Neste caso, uma das coisas que não arrumei foi o nome do campo Código Atendimento.
    Mas valeu pela sua dica e a do Silvio.
    Bom, voce me perguntou se o campo esta em formato texto.
    O campo (Código Atendimento) no formulário Atendimento ? È esse campo que vc quer saber se é texto ?
    Este campo esta como Numero Geral
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  ahteixeira em Qui 18 Maio 2017, 16:17

    Olá, estamos cá para ajudar.
    Eno MaximoAccess e o melhor para aprender.

    Perguntava o campo Código Atendimento da tabela Atendimento denque tipo é?

    Se tiver duvidas vá à tabela verificar.

    Se não conseguir resolver, poste base de dados com objectos envolvidos na questão.
    Abraço
    avatar
    rpfspawn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 07/09/2016

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  rpfspawn em Qui 18 Maio 2017, 16:21

    O campo Código de Atendimento na tabela Atendimento é Numeração Automática
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  ahteixeira em Qui 18 Maio 2017, 18:31

    Olá, então teste o seu código inicial, como indiquei na mensagem nr. 6

    Se o campo estiver noutra coluna altere 0,1...etc

    me.list0.columm (1...)

    Abraço
    avatar
    rpfspawn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 07/09/2016

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  rpfspawn em Qui 18 Maio 2017, 20:34

    Não funciona, abre o formulário no primeiro registro e não no registro que pedi
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 697
    Registrado : 07/12/2011

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  tauron em Qui 18 Maio 2017, 23:55

    So no chutometro eh complicado mas, vamos la. Supondo que tenha um codigo que atribua automaticamente o "codigo do atendimento" em um campo tipo texto, da um olhada neste exemplo
    Anexos
    Consulta.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (44 Kb) Baixado 2 vez(es)
    avatar
    rpfspawn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 07/09/2016

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  rpfspawn em Sex 19 Maio 2017, 13:52

    Tauron,

    Olha, só não mando o banco de Dados pois o mesmo já esta operacional e com muita informação.
    O Banco de Dados esta Dividido e em Rede.
    Estou tentando fazer um formulário de pesquisa para acelerar as consultas entende.
    Bom, quanto ao exemplo enviado. É exatamente isso que quero porém no meu não da certo.
    Reparei em um detalhe:

    Na origem da linha da sua ListaAtend esta assim:

    SELECT Tabela1.CodAtend, Tabela1.Nome FROM Tabela1 ORDER BY Tabela1.CodAtend;

    Na minha Lista0 esta assim:

    SELECT Atendimento.[Código Atendimento], Atendimento.Data, Atendimento.Apelido, Atendimento.Paciente, Atendimento.[Tipo do Exame], Atendimento.Empresa FROM Atendimento;

    Repare que no Código Atendimento esta entre colchetes ( [] ) e no seu não esta. Quando eu tiro os colchetes da erro de sintaxe.
    Será que este é o problema ?
    avatar
    rpfspawn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 07/09/2016

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  rpfspawn em Sex 19 Maio 2017, 14:08

    Veja,

    Fiz uma mudança, criei uma consulta e depois na origem da linha eu coloquei esta consulta criada.
    Mas continua dando erro veja:

    [Você precisa estar registrado e conectado para ver esta imagem.]
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  ahteixeira em Sex 19 Maio 2017, 15:02

    Olá Rodrigo,
    Na minha opinião acho que está a complicar.

    Já experimentou colocar diretamente:

    DoCmd.OpenForm "Atendimento", acNormal, , "[Código Atendimento] = 10"
    Nota o 10 é exemplo de um numero de código de atendimento da sua tabela.

    Se não consegue postar a base de dados com o form Pesquisa_atendimento e tabelas dependentes para se poder testar.
    Assim fica mais fácil.

    Abraço
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 697
    Registrado : 07/12/2011

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  tauron em Seg 29 Maio 2017, 01:00

    Shocked
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  ahteixeira em Sex 02 Jun 2017, 11:52

    Olá a todos,
    Rodrigo, como ficou a situação.
    Os utilizadores do fórum merecem e agradecem o retorno.
    Abraço
    avatar
    rpfspawn
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 07/09/2016

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  rpfspawn em Ter 29 Ago 2017, 22:42

    Estava hoje lendo minhas mensagens aqui no forum e vi que esta ficou sem resposta.
    Bom, me perdoem.

    Sobre o problema não sei o que acontece mas não foi solucionado.
    Fiz este código para outras aplicações em access e funcionou perfeitamente.
    Abre no registro correto.
    Então deixei este formulario pra la e fiz outro.

    Mas agradeço o apoio e me perdoem pelo esquecimento.

    Resolvido
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Erro de sintexe 3075

    Mensagem  ahteixeira em Qua 30 Ago 2017, 00:36

    Olá Rodrigo,
    Obrigado pelo retorno.
    O fórum agradece.
    Abraço

      Data/hora atual: Ter 21 Nov 2017, 17:32