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

    Trocar Codigo por consulta

    Compartilhe

    lourival
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 23/10/2011

    Trocar Codigo por consulta

    Mensagem  lourival em 26/2/2018, 07:01

    Pessoal bom dia!

    Term como eu trocar este codigo que é o SQL de uma consulta de:

    Me.Lista.RowSource = "SELECT PatrocinioXMeta.[Código da unidade], PatrocinioXMeta.[Nome completo da unidade], Format([Valor Aprovado],""Currency"") AS [Valor Concedido], Format([meta],""Currency"") AS Metas, Format([Valor Aprovado]/[Meta],""Percent"") AS Atingimento, Format([Meta]-[Valor Aprovado],""Currency"") AS Diferença " & vbCrLf & _
    "FROM PatrocinioXMeta " & vbCrLf & _
    "WHERE (((PatrocinioXMeta.[Código da unidade]) Like [forms]![pesquisa]![ag] & ""*""));"


    para Me.Lista.RowSource = patrocinioxmeta (é o nome da consulta)
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3904
    Registrado : 14/08/2013

    Re: Trocar Codigo por consulta

    Mensagem  FabioPaes em 26/2/2018, 08:59

    Olá, basta informar o nome da Consulta entre aspas!

    Me.Lista.RowSource = "patrocinioxmeta"


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!

      Data/hora atual: 20/7/2018, 09:48