MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

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


2 participantes

    [Resolvido]Consulta com WHERE no VBA

    avatar
    samueldesouza
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 12/06/2017

    [Resolvido]Consulta com WHERE no VBA Empty [Resolvido]Consulta com WHERE no VBA

    Mensagem  samueldesouza 12/6/2017, 14:50

    Olá, estou com uma dificuldade em fazer um Select com Where no meu código em VBA

    Tenho um banco de dados com a tabela tbFaturamento e quero selecionar a coluna Origem apenas que foram emitidos no mês 5.

    O código que criei ficou assim:

    SQL = "Select Unidade_Emissora Where Month(Data_de_Emissao) ='" & 5 & '" from tbFaturamento"  

    e nisto retorna o seguinte erro:

    erro de sintaxe (operador faltando) na expressão de consulta

    Alguém pode me ajudar?
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Consulta com WHERE no VBA Empty Re: [Resolvido]Consulta com WHERE no VBA

    Mensagem  JPaulo 12/6/2017, 15:57

    Bem vindo ao forum;

    Código:
    SQL = "Select Unidade_Emissora from tbFaturamento Where Month(Data_de_Emissao) =5"


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Consulta com WHERE no VBA Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Consulta com WHERE no VBA Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Consulta com WHERE no VBA Folder_announce_new Instruções SQL como utilizar...
    avatar
    samueldesouza
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 12/06/2017

    [Resolvido]Consulta com WHERE no VBA Empty Res: JPaulo

    Mensagem  samueldesouza 12/6/2017, 16:42

    Boa tarde JPaulo,
    Agora o código funcionou perfeitamente, só tenho outra duvida.

    No numero do dia inserido posso atribuir o valor de uma célula?

    Se sim como passo inserir no código ?

    SQL = "Select Unidade_Emissora from tbFaturamento Where Month(Data_de_Emissao) = VALOR DA CÉLULA "
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Consulta com WHERE no VBA Empty Re: [Resolvido]Consulta com WHERE no VBA

    Mensagem  JPaulo 12/6/2017, 16:44

    Amigão, este é um forum exclusivamente de Ms Access, sendo que por vezes o VBA é identico.

    Código:
    SQL = "Select Unidade_Emissora from tbFaturamento Where Month(Data_de_Emissao) = " & Sheets("SeuSheet").Range("A2").Value

    Tópico movido para Off-topic.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Consulta com WHERE no VBA Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Consulta com WHERE no VBA Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Consulta com WHERE no VBA Folder_announce_new Instruções SQL como utilizar...
    avatar
    samueldesouza
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 12/06/2017

    [Resolvido]Consulta com WHERE no VBA Empty Re: [Resolvido]Consulta com WHERE no VBA

    Mensagem  samueldesouza 12/6/2017, 19:00

    Obrigado Pela Ajuda Amigo.

    Conteúdo patrocinado


    [Resolvido]Consulta com WHERE no VBA Empty Re: [Resolvido]Consulta com WHERE no VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 18:30