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

    Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código

    avatar
    samueldrun
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 21/09/2017

    Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código Empty Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código

    Mensagem  samueldrun Qui 8 Ago - 18:47

    Boa noite mestres,

    tenho um cardápio onde terão alguns pratos fixos, porém não consegui fixar eles no meu subformulário então pensei em colocar um botão onde ao clicar ele adicione nesse subformulário os pratos com a opção fixo marcada

    alguém pode me ajudar ?
    avatar
    renpv
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 323
    Registrado : 12/01/2015

    Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código Empty Re: Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código

    Mensagem  renpv Seg 12 Ago - 20:35

    O caminho é esse mesmo. Tenta criar esse botão. Se não conseguir posta uma parte do sistema aqui que a gente pode te dar uma força
    avatar
    samueldrun
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 21/09/2017

    Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código Empty Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código

    Mensagem  samueldrun Seg 12 Ago - 20:59

    Boa noite

    desculpe a demora, eu meio que adaptei para minha necessidade e consegui o seguinte código:

    Código:
    Dim i, n, c As Integer
    n = DCount("Código", "insercao", "refeicao ='" & Me!Texto68 & "'")
    c = DLookup("Código", "insercao", "Refeicao = '" & Me!Texto68 & "'")
    Me!subproducao_criacao.SetFocus
    For i = 1 To n
    DoCmd.GoToRecord , , acNewRec
    Me!subproducao_criacao!Produto = c
    Next i

    mas estou com problema nessa parte:

    Código:
    c = DLookup("Código", "insercao", "Refeicao = '" & Me!Texto68 & "'")

    por que toda vez que o loop cria um novo campo e atribui um valor ao campo esse valor é repetido, sabe como posso adaptar para não repetir ?
    avatar
    samueldrun
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 21/09/2017

    Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código Empty Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código

    Mensagem  samueldrun Ter 13 Ago - 9:48

    Alguém ?
    avatar
    renpv
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 323
    Registrado : 12/01/2015

    Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código Empty Re: Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código

    Mensagem  renpv Ter 13 Ago - 13:04

    Se você quer que ele inclua outros valores você vai ter que criar outro array com os valores que deseja criar. Aí você coloca um FOR dentro do outro

    Conteúdo patrocinado


    Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código Empty Re: Como inserir por exemplo 3 registros de uma vez em um subformulário ou tabela via código

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Qui 21 Nov - 16:58