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 3265 item nao encontrado na coleção

    maguim
    maguim
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 446
    Registrado : 15/05/2013

    [Resolvido]Erro 3265 item nao encontrado na coleção Empty [Resolvido]Erro 3265 item nao encontrado na coleção

    Mensagem  maguim em 16/4/2019, 19:34

    salvee amigos tudo bem?


    estou com outro impasse aqui em gerar uns contratos automáticos...

    peguei um exemplo otimo feito por algumas pessoas do forum, que não deram continuidade.

    estou tentando adaptar ao meu app, porem não estou conseguindo entender a logica pra trazer os resultados ao gerador de contrato...

    se alguém poder dar um luz..


    abraços
    Anexos
    [Resolvido]Erro 3265 item nao encontrado na coleção Attachmenttestecontrato.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (144 Kb) Baixado 14 vez(es)


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Erro 3265 item nao encontrado na coleção Empty Re: [Resolvido]Erro 3265 item nao encontrado na coleção

    Mensagem  Silvio em 17/4/2019, 14:41

    Veja se é isso...

    Código:
    Private Sub Form_Load()
    Contrato.TextFormat = acTextFormatHTMLRichText

    'criado por Alexandre Neves Em 2011-05-15 para Domingos do fórum MaximoAccess
    'Adaptado por Ruggeri Barbosa em  27/05/2016
    'Editado por FabioPaes em 27/05/2016


    Dim I As Integer
    Dim F As String
    Dim campo As String



    strquery = "cme"
    F = ""


    For I = 1 To CurrentDb.QueryDefs(strquery).Fields.Count

    F = F & ";" & CurrentDb.QueryDefs(strquery).Fields(I - 1).Name
    If CurrentDb.QueryDefs(strquery).Fields(I - 1).Name <> "Contrato" Then

    F = F & " " & DLookup(CurrentDb.QueryDefs(strquery).Fields(I - 1).Name, "Cme", "CODPASTA = " & Me.PROTOCOLO)
    End If



    Next
    ListaINterna = Right(F, Len(F) - 1)  'Remove a ,Anes do Primeiro Campo
    Me.Lista40.RowSource = (ListaINterna)



    End Sub


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]Erro 3265 item nao encontrado na coleção Empty Re: [Resolvido]Erro 3265 item nao encontrado na coleção

    Mensagem  JPaulo em 17/4/2019, 14:43

    Olá;

    Substitua CurrentDb.TableDefs(strTabela) por CurrentDb.QueryDefs(strTabela)

    Porque o nome "cme" é uma consulta, não uma tabela.


    .................................................................................
    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]Erro 3265 item nao encontrado na coleção Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Erro 3265 item nao encontrado na coleção Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Erro 3265 item nao encontrado na coleção Folder_announce_new Instruções SQL como utilizar...
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]Erro 3265 item nao encontrado na coleção Empty Re: [Resolvido]Erro 3265 item nao encontrado na coleção

    Mensagem  JPaulo em 17/4/2019, 14:44

    Esta foi em simultâneo Silvio.


    .................................................................................
    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]Erro 3265 item nao encontrado na coleção Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Erro 3265 item nao encontrado na coleção Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Erro 3265 item nao encontrado na coleção Folder_announce_new Instruções SQL como utilizar...
    maguim
    maguim
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 446
    Registrado : 15/05/2013

    [Resolvido]Erro 3265 item nao encontrado na coleção Empty Re: [Resolvido]Erro 3265 item nao encontrado na coleção

    Mensagem  maguim em 17/4/2019, 15:26

    caramba em!!! rapidos kkkk

    tenho algumas duvidas rs... bounce Laughing


    Deu certo aqui o que vc mandaram, porem queria saber se é possivel editar a lista de valores do listbox na parte de origem de linha. Porque esta desconfigurado

    tentei por la direto umas ;; pra ficar um debaixo a outra
    só que nao esta subindo corretamente sempre desconfigurado

    alguma sugestão?

    tentei fazer desta forma, mas nao tive exito.

    Código:
    Private Sub Form_Load()
    Me.Lista40.RowSourceType = "Value List"
        Me.Lista40.RowSource = ""

        Me.Lista40.AddItem


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised
    maguim
    maguim
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 446
    Registrado : 15/05/2013

    [Resolvido]Erro 3265 item nao encontrado na coleção Empty Re: [Resolvido]Erro 3265 item nao encontrado na coleção

    Mensagem  maguim em 17/4/2019, 16:02

    deu certo aqui, porem nao esta trazendo os resultado no relatorio:

    ja verifiquei os dlookup e nome de mascaras esta tudo certo, porem nao vem os resultados


    uma luz? Neutral

    segue bd atualizado
    Anexos
    [Resolvido]Erro 3265 item nao encontrado na coleção Attachmenttesteatualizado.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (176 Kb) Baixado 2 vez(es)


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Erro 3265 item nao encontrado na coleção Empty Re: [Resolvido]Erro 3265 item nao encontrado na coleção

    Mensagem  Silvio em 17/4/2019, 17:49

    JPaulo, " tamu" juntos....srsrs

    Maguim...nova duvida....novo tópico.

    Não se mistura as coisa.

    Abraços.

    E não se esqueça de colocar o tópico como resolvido.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    maguim
    maguim
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 446
    Registrado : 15/05/2013

    [Resolvido]Erro 3265 item nao encontrado na coleção Empty Re: [Resolvido]Erro 3265 item nao encontrado na coleção

    Mensagem  maguim em 17/4/2019, 18:00

    @silvio

    vlw.... abrindo outro


    abraços

    Resolvido


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised

    Conteúdo patrocinado

    [Resolvido]Erro 3265 item nao encontrado na coleção Empty Re: [Resolvido]Erro 3265 item nao encontrado na coleção

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 20/11/2019, 18:12