Boa noite, estou com um problema em um formulário, especificamente em conseguir somar os valores de 5 sub formulários contidos neste formulário,
já tentei usando Nz() IIF() VarType() e até agora nada.
Queria achar uma maneira de somar esses campos no rodapé do meu form principal, no formato dos campos utilizei o formato #,###"KG" (É um sistema de calculo de arraçoamento para peixes, por padrão uso esse formato em quase todo db.)
Em todos os subforms tenho um campo "Trato Total" com o formato #,###"KG", esse que quero a soma no form principal:
- Já criei campos de soma no rodapé dos subforms(FormTrato1 e FormTrato2) usando =Soma(Nz([Trato Total];0)) - Este está funcionando perfeitamente
- Porém no campo "Total Diário de Ração" no Form principal sempre dar #Erro! #Nome! ou #Tamanho!
Utilizo uma combobox "Tanque" e um Controle de Guias "guias" com os Tanques (Tanque1,Tanque2...etc) e utilizei duas private subs para assim que alterar o campo da combobox alterar a guia e vice-versa.
-Acrescimo: Quando alguma expressão aparentemente vai funcionar ele retorna o erro no VBA: "Este Recordset não pode ser atualizado", quando tento mudar de guia, ou valor da combobox.
Private Sub guias_Change()
Forms!FRM_Arraçoamento!Tanque = Me.guias.Value 'faz com que ao clicar na guia o valor da combobox mude
Me.Form.Refresh
End Sub
Private Sub Tanque_Change()
Forms!FRM_Arraçoamento!guias = Me.Tanque.Column(0) 'faz com que ao mudar o valor da combobox a guia mude
Me.Form.Refresh
End Sub
- Estou enviando uma cópia do DB, caso alguém queira dar uma olhada o formulário se chama "FRM_Arraçoamento"
Desde já grato a quem ajudar, sou ainda leigo no Access mas já acompanho a algum tempo o Forum,já procurei bastante sobre este problemas, mas sem solução, então por isso resolvi criar um tópico.
já tentei usando Nz() IIF() VarType() e até agora nada.
Queria achar uma maneira de somar esses campos no rodapé do meu form principal, no formato dos campos utilizei o formato #,###"KG" (É um sistema de calculo de arraçoamento para peixes, por padrão uso esse formato em quase todo db.)
Em todos os subforms tenho um campo "Trato Total" com o formato #,###"KG", esse que quero a soma no form principal:
- Já criei campos de soma no rodapé dos subforms(FormTrato1 e FormTrato2) usando =Soma(Nz([Trato Total];0)) - Este está funcionando perfeitamente
- Porém no campo "Total Diário de Ração" no Form principal sempre dar #Erro! #Nome! ou #Tamanho!
Utilizo uma combobox "Tanque" e um Controle de Guias "guias" com os Tanques (Tanque1,Tanque2...etc) e utilizei duas private subs para assim que alterar o campo da combobox alterar a guia e vice-versa.
-Acrescimo: Quando alguma expressão aparentemente vai funcionar ele retorna o erro no VBA: "Este Recordset não pode ser atualizado", quando tento mudar de guia, ou valor da combobox.
Private Sub guias_Change()
Forms!FRM_Arraçoamento!Tanque = Me.guias.Value 'faz com que ao clicar na guia o valor da combobox mude
Me.Form.Refresh
End Sub
Private Sub Tanque_Change()
Forms!FRM_Arraçoamento!guias = Me.Tanque.Column(0) 'faz com que ao mudar o valor da combobox a guia mude
Me.Form.Refresh
End Sub
- Estou enviando uma cópia do DB, caso alguém queira dar uma olhada o formulário se chama "FRM_Arraçoamento"
Desde já grato a quem ajudar, sou ainda leigo no Access mas já acompanho a algum tempo o Forum,já procurei bastante sobre este problemas, mas sem solução, então por isso resolvi criar um tópico.
- Anexos
- Piscicultura Tuby.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (1.6 Mb) Baixado 8 vez(es)