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

    Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Compartilhe

    cjsilva2013
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 26/06/2013

    Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  cjsilva2013 em Sex 02 Mar 2018, 11:28

    Bom dia a todos,

    Mais uma vez incomodando vocês coim dúvidas e necessidades profissional, pois preciso de ajuda com uma situação...

    Estou desenvolvendo um sistema simples de controle financeiro. Na tabela tblFinanceiro criei os campos:
    IDFinanc | Data | Responsável | Razão | Cidade | UF | Recibo_NFe | Tipo (Combo com tipo de lançamento: Receita ou Despesa) | Descrição | Valor

    Num botão, coloquei a opção para salvar assim:

    Private Sub cmdSalvar_Click()
    If MsgBox(" Deseja salvar esse cadastro ?", vbOKCancel + vbDefaultButton1 + vbInformation, "Aviso!") = vbOK Then
    DoCmd.Save ' salva o registro
    DoCmd.RunCommand acCmdRefresh ' atualiza a tabela e o formulario
    MsgBox " Cadastro salvo com sucesso", vbInformation + vbOKOnly, " Aviso!"

    DoCmd.RunCommand acCmdSaveRecord
    DoCmd.GoToRecord , , acNewRec
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
    Exit Sub

    End If
    End Sub

    Só que gostaria de ao salvar, se na combo cboTipo estiver marcado "Receita" ou "Despesa" os valores vão para esses respectivos campos.

    Ex:

    Lancei as informações referente a Receita... Preenchi os campos, e na cboTipo, escolhi "Receita". Quando clicar em salvar, o valor inserido vá para o campo Recita na tabela tblFinanceiro. Da mesma forma se escolher na cboTipo Despesa, o valor vá para o campo Despesa...

    Desde já agradeço,

    Abraço
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3385
    Registrado : 06/11/2009

    Re: Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  Assis em Sex 02 Mar 2018, 11:36

    Francisco

    Quer postar só esse formulário de registar os movimentos, e as tabelas em questão ?

    Não deve utilizar o nome "Valor" para um campo, antes de continuar mude para por exemplo "txtvalor" para não vir a ter problemas no futuro.
    Assim como o campo "Data".

    Agardo


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    CassioFabre
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 665
    Registrado : 18/01/2013

    Re: Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  CassioFabre em Sex 02 Mar 2018, 11:46

    Bom dia,

    Mas na lista de campos que você passou não existem os campos "Despesa" e "Receita". Apenas o campo "tipo", que é o identificador do lançamento.

    Abraço.


    .................................................................................
    Só não tem código pra morte!

    cjsilva2013
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 26/06/2013

    Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  cjsilva2013 em Sex 02 Mar 2018, 12:08

    Bom dia Assis, Cássio,

    Desde já agradeço seu apoio...

    Segue link como solicitado...

    É uma base simples para controle financeiro pessoal... Mais me ajudará. No Anexo da para compreender. Quando lanço as informações e escolho na combo Tipo= Receita ou Despesa, gostaria que os valores do campo valor, seja salva nos campos Receita ou Despesa. Preciso fazer o saldo e a consulta com os totalizadores para os relatórios... Me enganchei aí...

    Mais uma vez obrigado...

    Segue,

    [Você precisa estar registrado e conectado para ver este link.]
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3385
    Registrado : 06/11/2009

    Re: Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  Assis em Sex 02 Mar 2018, 14:01

    Francisco

    Desse link não faço downlods

    Ponha aqui no forum


    .................................................................................
    *** Só sei que nada sei ***

    cjsilva2013
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 26/06/2013

    Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  cjsilva2013 em Sex 02 Mar 2018, 14:07

    Opa, Assis, segue link no Dropbox...

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

    Aqui não tenho o WinZip instalado...
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3385
    Registrado : 06/11/2009

    Re: Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  Assis em Sex 02 Mar 2018, 14:10

    Francisco

    Na próxima nao coloque o link completo

    Ponha assim
    dropbox.com/s/87dr1rrk6inf1oj/ControleFinanceiro%20-%20Copia.rar?dl=0

    Corte esta parte abaixo

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

    Leis do forum

    Aguarde vou analisar.


    .................................................................................
    *** Só sei que nada sei ***

    cjsilva2013
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 26/06/2013

    Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  cjsilva2013 em Sex 02 Mar 2018, 14:54

    Opa, tranquilo. Obrigado por me orientar

    Estou sempre aberto a aprender...

    Blz, aguardo sim...

    Vocês são uma benção em minha vida..
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3385
    Registrado : 06/11/2009

    Re: Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  Assis em Sex 02 Mar 2018, 18:41

    Francisco

    Teste

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


    .................................................................................
    *** Só sei que nada sei ***

    cjsilva2013
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 26/06/2013

    Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  cjsilva2013 em Sex 02 Mar 2018, 19:05

    Muito bom Assis.

    Sou grato a Deus pela sua vida...

    Ao salvar esta dando erro no .Update. Diz que o ID está duplicado...

    Me.txtID = "" Fica amarelo...

    A mensagem:

    Depois que clica em salvar e mostra mensagem ok...

    Erro em tempo de execução '-2147352567 (80020009)':
    Você deve digitar um valor no campo 'tblLancamentos.ID'.
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3385
    Registrado : 06/11/2009

    Re: Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  Assis em Sex 02 Mar 2018, 19:22

    Francisco

    Está a testar na que eu alterei ou importou os objetos para a sua ?

    Aqui no meu 2013 32 Bits posso fazer 10 registos seguidos sem problemas.

    Qual o seu Office?
    Tem todas as atualizações?

    Aguardo

    PS espero que alguém teste aqui no fórum e retorne o mesmo acontecimento


    .................................................................................
    *** Só sei que nada sei ***

    cjsilva2013
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 26/06/2013

    Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  cjsilva2013 em Sex 02 Mar 2018, 19:42

    Opa, a versão do meu Office é o 2016 e win 10 64bits

    Subi na minha base e deu o mesmo erro... Tinha testado no download que baixei...

    Na minha base deu o mesmo erro...

    Salva a informação, quando clico em apurar, mostra o erro no VB... Mais fica salva as informação.
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3385
    Registrado : 06/11/2009

    Re: Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  Assis em Sex 02 Mar 2018, 19:58

    Francisco

    Teste esta ... se não der vai ter que esperar ajuda . Pode ser por o seu ser 64.


    .................................................................................
    *** Só sei que nada sei ***

    cjsilva2013
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 26/06/2013

    Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  cjsilva2013 em Sex 02 Mar 2018, 20:09

    Amigo, você é uma benção... Agora foi. Deu erro não...

    Desde já lhe agradeço pela sua atenção e ajuda...

    Quero aqui mencionar a importância de cada um de vocês da equipe Maximo Access, em se disponibilizar para ajudar muitos que de forma profissional ou não, buscam aprender a programar. O Microsoft Access é complexo de manejar, pois exige conhecimento avançado de Lógica de programação e VB. Contudo, é excelente e de grande importância o trabalho realizado por cada um dos senhores na caminhada de nós iniciantes em programação...

    Deus abençoe cada um e suas famílias...

    Dou esse problema por resolvido.
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3385
    Registrado : 06/11/2009

    Re: Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  Assis em Sex 02 Mar 2018, 20:14

    Francisco

    Obrigado pelo retorno.

    Veja a diferença ....

    Se resolvido ???? Marque o mesmo

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


    .................................................................................
    *** Só sei que nada sei ***

    cjsilva2013
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 26/06/2013

    [Resolvido]Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  cjsilva2013 em Sex 02 Mar 2018, 20:45

    Opa, homem fiquei tão feliz aqui que esqueci de marcar o resolvido...

    Pronto feito...


    cjsilva2013
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 26/06/2013

    Ajuda com botão Lançar informações na tabela nos campos receita e despesa

    Mensagem  cjsilva2013 em Sab 10 Mar 2018, 19:26

    Boa tarde senhores,

    Me desculpe reabrir esse tópico. Pois um problema surgiu dentro do mesmo formulário tratado aqui...

    É que ao registrar as informações, salva normalmente. Mas quando preciso alterar alguma informação nesse registro, e clico no botão salvar, simplesmente exclui as informações do registro...

    Algum dos senhores já viu algo assim...

    A base é a mesma...

    Desde já agradeço peça ajuda...


      Data/hora atual: Sex 25 Maio 2018, 19:40