[Resolvido]Criar nova cx. de combinação ao escolher dados em outra cx. de combinação

Olá pessoal!
Como fazer de forma simples (VBA) uma caixa de combinação aparecer após escolher dados numa anterior?

CASO:
Numa requisição de material o usuário precisa de pedir três itens: Caneta; lápis e borracha
Mas cada material deverá aparecer numa combo de cada vez...

Pensei o seguinte:
Num subformulário, existe uma caixa de combinação onde o usuário escolhe CANETA, após isso aparece outra caixa de combinação abaixo da primeira onde o usuário poderá escolher o LÁPIS e assim por diante.... E caso existem muitos materiais e pouco espaço, uma barra de rolagem vertical será apresentada.

Alguém pode me ajudar?

Bom dia,

veja este exemplo e tente adaptar a sua BD.

https://www.wetransfer.com/downloads/40710e8427fb96543cb971d37631868c20150225100527/5edcc1c278ab515215a3cd510c14243c20150225100527/7c7a59

Abraço...

Obrigado Roberto_1977, mas na verdade o que eu preciso fazer não é um filtro...

VEJA O ANEXO

Depois de escolher um material (no subformulário acoplado ao form principal)
uma nova caixa de combinação aparecerá abaixo para escolha do próximo material.

Luz e Paz!

tente este..

https://www.wetransfer.com/downloads/1146c78169cf0a0c8fea52e4a1b9bc2320150226180030/d982eb404f2914a54c34ee919d20015120150226180030/7bf9ed

Obrigado, mas não é isso....
Queria te enviar o DB, mas não tenho espaço para isso...

Você pode me passar seu e-mail?

Luz e Paz!

Envia teu BD para:
Roberto.cardoso@riopele.pt

Olá Roberto,
Consegui fazer o que queria, mas não consigo deletar em um formulário contínuo somente um registro. [ENVIEI PARA SEU E-MAIL]

Obrigado... Luz e Paz!

Paulo

Bom dia,

Veja se da...

Olá Roberto,
Te agradeço imensamente, mas seria exatamente como eu lhe enviei por e-mail ontem.
Agora só falta como fazer para excluir em um formulário contínuo através de um botão somente o registro da linha onde se clicar no botão "Excluir".

P.S.: se não for pedir demais, gostaria se possível, que postasse o exemplo que te enviei para futuros estudos, pois eu não consigo fazer upload de nada.

Novamente, o meu muito obrigado por sua paciência e colaboração.

Luz e Paz!

Bom dia paulo,

O seu email ontem não trazia anexo, só um ficheiro txt.

Abraço...

Vamos tentar assim:

No seu formulário continuo, em modo estrutura cria um botão no detailhe do seu form.
Ao ver o form em modo visualização normal, esse novo botão vai se repetir nas sua linhas.

No código do seu botão coloque ao Clikar o seguinte código:

Docmd.setwrning false
If MsgBox("Deseja eliminar?", vbInformation + vbYesNo, "Eliminar") = vbYes Then
DoCmd.RunCommand acCmdDeleteRecord
Else
MsgBox "Operação abortada...", vbCritical, "INfo"
End If
Docmd.setwarning true

Te enviei o DB novamente!

Eu desejo deletar somente um registro onde eu clico no botão que tá na linha deste registro... Veja:

Private Sub butDelete_Click()
On Error Resume Next
Dim I As String
I = MsgBox("Deseja excluir esta entrada?", vbYesNo, "GEAP/MG")
If I = vbYes Then
DoCmd.RunSQL "DELETE * FROM Requisição WHERE CódigoS = '" & Me.txtCodConS.Value & "'"
DoCmd.Requery
MsgBox "Exclusão concluída.", vbInformation, "GEAP/MG"
End If
End Sub

Luz e Paz!

Boa tarde,

Já enviei email...

Abraço....

Obrigado Roberto,
Mas antes eu tentei assim SEMPRE exclue o primeiro registro e não o registro pretendido.

Luz e Paz!

Roberto me ajudou... Resolvemos o problema por e-mail.
Não tenho mais este projeto para mostrar aqui.