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]Outra maneira de pesquisar dando problema

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2676
    Registrado : 23/01/2018

    [Resolvido]Outra maneira de pesquisar dando problema Empty [Resolvido]Outra maneira de pesquisar dando problema

    Mensagem  crysostomo 28/2/2019, 22:01

    Pivate Sub cbo_Click()
      Me.RecordsetClone.FindFirst "[CodSec] = '" & Me![cbo] & "'"
     
    Me.Bookmark = Me.RecordsetClone.Bookmark

    depois do recordsetlone. o método Bookmark não aparece
    qual é o problea que essa linha está me dando não consigo enxergar , pode me explicar?
      Me.cbo = Null
    End Sub


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    caiosouza
    caiosouza
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 419
    Registrado : 05/12/2016

    [Resolvido]Outra maneira de pesquisar dando problema Empty Re: [Resolvido]Outra maneira de pesquisar dando problema

    Mensagem  caiosouza 1/3/2019, 08:34

    Bom dia!

    Tente trocar o Me![Cbo] pra Me.Cbo

    O Me! é usado para setar um controle da fonte do formulário, o Me. é para setar um controle do formulário.
    O "[CodSec]" é mesmo texto?, se não deve alterar as as aspas para "[CodSec]=" & Me.cbo & ""

    Código:

    Pivate Sub cbo_Click()
      Me.RecordsetClone.FindFirst "[CodSec]='" & Me.cbo & "'"
      Me.Bookmark = Me.RecordsetClone.Bookmark
      Me.cbo = VbNullString
    End Sub


    .................................................................................
    Caio Souza

    Engenheiro de Software
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2676
    Registrado : 23/01/2018

    [Resolvido]Outra maneira de pesquisar dando problema Empty Re: [Resolvido]Outra maneira de pesquisar dando problema

    Mensagem  crysostomo 1/3/2019, 08:51

    os campo são tudo tetxo
    ele me retorna a mesma mensagem , "operação anterior você cancelou" depois mansada outra mensagem , " não reconhece secretaria1 como campo de expressão valida"


    CodSec     Código    CodSetor DescSetor     DescSec
    secretaria1    1          setor1            a            teste1
    secretaria2    2          setor2            b            teste2
    secretaria3    3          setor3            c            teste3
    secretaria4    4          setor4            d            teste4
    secretaria5    5          setor5            e            teste5

    Código:
    Private Sub cbo_Click()
      
      Me.RecordsetClone.FindFirst "[CodSec]=" & Me.cbo & ""
      Me.Bookmark = Me.RecordsetClone.Bookmark
      Me.cbo = vbNullString
    End Sub

    Código:
    Me.RecordsetClone.FindFirst "[CodSec] = '" & Me![cbo] & "'"
     
        Me.Bookmark = Me.RecordsetClone.Bookmark
       
        Me.CodSec.SetFocus

    aonde eu estou errando?


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    caiosouza
    caiosouza
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 419
    Registrado : 05/12/2016

    [Resolvido]Outra maneira de pesquisar dando problema Empty Re: [Resolvido]Outra maneira de pesquisar dando problema

    Mensagem  caiosouza 1/3/2019, 11:49

    Boa tarde,

    Posta parte da base de dados para analisarmos...


    .................................................................................
    Caio Souza

    Engenheiro de Software
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2676
    Registrado : 23/01/2018

    [Resolvido]Outra maneira de pesquisar dando problema Empty Re: [Resolvido]Outra maneira de pesquisar dando problema

    Mensagem  crysostomo 1/3/2019, 15:41

    está ai
    Anexos
    [Resolvido]Outra maneira de pesquisar dando problema AttachmentPESQUISA.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (86 Kb) Baixado 32 vez(es)


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2676
    Registrado : 23/01/2018

    [Resolvido]Outra maneira de pesquisar dando problema Empty Re: [Resolvido]Outra maneira de pesquisar dando problema

    Mensagem  crysostomo 21/3/2019, 07:33

    De um jeito ele funciona uma hora ele para , mas vou deixando com9 resolvido pois o código está certo , obrigado aí amigo, eu não sabia a diferença do "." é do "!"


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    Conteúdo patrocinado


    [Resolvido]Outra maneira de pesquisar dando problema Empty Re: [Resolvido]Outra maneira de pesquisar dando problema

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 13:39