[Resolvido]Determinar valor de uma caixa de texto vinculada ao valor de uma caixa de combinação

Bom dia.

Sou iniciante em Access e estou criando um formulário para controle de folha de pagamento.
Minha dúvida é a seguinte:
Se o salário de um colaborador é de até 1399,12 o valor de INSS a ser descontado é de 8%, se for maior que 1399,12 e menor que 2331,88 o valor do INSS a ser descontado é de 9% e se for acima de 2331,88 o valor do INSS a ser descontado é de 11%.
Gostaria que quando o valor do salário aparecer na caixa de combinação, a caixa de texto aparecesse o valor de INSS a ser descontado referente a faixa de salário.

Ficarei muito grato pela ajuda.

BNeto

boa tarde,

Voce deve criar uma condição, fiz os teste no excel funcionou, teste este: (coloque em botão pra calcular) se preferir o resultado em numero para calculo defina para decimal elimine as aspas tipo para "8%" coloque apenas 0,8 sem aspas.


If IsNull(suacaixatexto) Then

MsgBox "Digite o salario", vbExclamation, "Aviso"

Else

If Me.suacaixatexto <= 1399.12 Then

Me.suacaixaresultado = "8%"

ElseIf Me.suacaixatexto <= 2331.88 Then

Me.suacaixaresultado = "9%"

ElseIf Me.suacaixatexto > 2331.88 Then

Me.suacaixaresultado = "11%"

End If


End If


espero ter ajudado

Boa tarde Lander,

No Access não funcionou não. Segue abaixo a condição feita:


Private Sub cbx_salario_AfterUpdate(Cancel As Integer)

If IsNull(cbx_salario) Then
MsgBox "Digite o salario", vbExclamation, "Aviso"
Else
If Me.cbx_salario <= 1399.12 Then
Me.txt_inss = "0,08"
Else*If Me.cbx_salario<= 2331.88 Then
Me.txt_inss = "0,09"
ElseIf Me.cbx_salario> 2331.88 Then
Me.txt_inss = "0,11"
End If

End If

End Sub

Ps. Sem as aspas fica dando erro na condição.

Remova esse asterisco else*if
Na porcentagem coloque sem aspas e não utilize vírgula use . ponto ex: 8% fica 0.08

funfou normal conforme orientação da ultima mensagem

segue em anexo exemplo:

https://www.dropbox.com/s/j1osnfrs2k4r0vx/calculo.zip?dl=0

Boa tarde Lander,


Eu fiz uma pequena alteração na seu exemplo pra vc ver o que esta acontecendo.

Segue o link: https://www.dropbox.com/s/etsa42q4yrhe0f5/calculo.rar?dl=0

Eu seleciono o salario na COMBO clico em calcular o os valores não mudam na TXT.

Obrigado pela força e vai desculpando a imperícia.


Abraço.

formatei a tabela unidade monetaria tipo padrao, o código é o mesmo.

https://www.dropbox.com/s/9ft88pg3d7vojg3/calculo_new.rar?dl=0

Bom dia Lander,

Cara no seu formulário ta funcionando perfeitamente.
Mas quando faço no meu formulário não funciona, fiz as alterações nas tabelas como vc havia sugerido e não adiantou.
Estou te mandando o formulário que criei pra vc me ajudar.


Segue o link: https://www.dropbox.com/s/9ie78wya77rhl2i/Calculo_2.rar?dl=0

Grato

funcionando

criei um textbox oculto onde recebe a informação do salário, acredito que esteja dando alguma pane devido aos combos sincronizados
o ideal seria utilizar o Dlookup, mas do jeito que fiz funciona.

https://www.dropbox.com/s/h0yiupslnvk2har/Calculo_2.zip?dl=0