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]SQL para VBA

    Compartilhe
    avatar
    xoxe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 241
    Registrado : 27/03/2016

    [Resolvido]SQL para VBA

    Mensagem  xoxe em Qua 28 Jun 2017, 16:31

    Senhores,

    Estou numa dúvida como proceder.

    Código:
    SELECT Criterios.Chave, OperadoresFeixe.Operador, OperadoresFeixe.Principal, Supervisor.Supervisor, Coordenador.ChaveCoord, Criterios.Demais_Pausas, Criterios.Disp_Prod, Criterios.Falado, Criterios.Logados, Criterios.NR17, Criterios.TMO, Criterios.Total_Pausas, Criterios.Dia
    FROM Supervisor INNER JOIN (Coordenador INNER JOIN (OperadoresFeixe INNER JOIN Criterios ON OperadoresFeixe.Chave = Criterios.Chave) ON Coordenador.ChaveCoord = OperadoresFeixe.Coordenador) ON Supervisor.ChaveSup = OperadoresFeixe.Supervisor
    WHERE (((Coordenador.ChaveCoord)=[Formulários]![FrmConsulta]![txtCoord]) AND ((Criterios.Dia)=[Formulários]![FrmConsulta]![Datatxt])) OR (((Supervisor.Supervisor)=[Formulários]![FrmConsulta]![txtSuper]) AND ((Criterios.Dia)=[Formulários]![FrmConsulta]![Datatxt]))
    ORDER BY Supervisor.Supervisor, Criterios.Demais_Pausas DESC , Criterios.Disp_Prod, Criterios.Falado, Criterios.Logados, Criterios.NR17 DESC , Criterios.TMO DESC , Criterios.Total_Pausas DESC;

    Este código é de uma consulta criada e funcional a partir do assistente de consulta do próprio access.
    Porém o que desejo e não sei como começar...
    Quero um comando onde, ao apertar o botão faça select para aparecer numa caixa de listagem já criada esta consulta.


    .................................................................................

    "Não podemos solucionar problemas usando a mesma forma de raciocínio que usamos quando os criamos." - Albert Einstein



    Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja [Você precisa estar registrado e conectado para ver este link.].
    Não esqueça de clicar no Joinha [Você precisa estar registrado e conectado para ver esta imagem.] para agradecer a dica que solucionou seu problema.
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]SQL para VBA

    Mensagem  JPaulo em Qua 28 Jun 2017, 16:45

    Pelo que entendi é simples;

    1º Use este meu banco, para converter o seu SQL para VBA.

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

    2º Cole a instrução VBA, toda no VBA do seu botão e envie para a sua lista;

    Código:
    Private Sub SeuBotão_Click()
    Dim strSql$

    'cole aqui instrução convertida.

    Me.SuaLista.RowSource = strSql

    End Sub


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

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

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]SQL para VBA

    Mensagem  JPaulo em Qui 13 Jul 2017, 17:01

    Serviu ?

    O retorno é importante para que outros usuários o saibam.


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

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

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    avatar
    xoxe
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 241
    Registrado : 27/03/2016

    Re: [Resolvido]SQL para VBA

    Mensagem  xoxe em Qui 13 Jul 2017, 17:46

    Ajudou, mas mudei a estrutura do banco de dados. De qualquer modo, agradeço a atenção!


    .................................................................................

    "Não podemos solucionar problemas usando a mesma forma de raciocínio que usamos quando os criamos." - Albert Einstein



    Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja [Você precisa estar registrado e conectado para ver este link.].
    Não esqueça de clicar no Joinha [Você precisa estar registrado e conectado para ver esta imagem.] para agradecer a dica que solucionou seu problema.
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]SQL para VBA

    Mensagem  JPaulo em Qui 13 Jul 2017, 19:51

    Entao nao se esqueça que o retorno é sempre importante.


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

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

    Sucesso e Bons Estudos
    Success and Good Studies

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

      Data/hora atual: Ter 21 Nov 2017, 10:13