ComboBox para combinar 3 informações.
Enviado: Ter Out 08, 2019 5:36 pm
Pessoal boa tarde,
Eu preciso relacionar o seguintes campos Categoria -> Modelo = Preço.
No qual quando eu selecionar o modelo da máquina com base na sua categoria o campo preço será preenchido automaticamente.
Para isso eu estou usando o sample da "Northwind" e criei uma comboBox e uma tabela "Categories" e já a relacionei com a tabela "Products".
No VBA eu escrevi o seguinte para selecionar o modelo conforme sua categoria :
Private Sub cboCategories_AfterUpdate()
Me.cboProducts.RowSource = "SELECT ProductName FROM" & _
" Products WHERE CategoryID = " & Me.cboCategories & _
" ORDER BY ProductName"
End Sub
Porém agora não sei como escrever para que o preço que eu especifiquei para cada modelo na tabela "Products" apareça no campo "Unit Price" do formulário, quando eu selecionar o modelo.
Alguém pode me ajudar, coloquei o arquivo em anexo?
Muito Obrigada.
Eu preciso relacionar o seguintes campos Categoria -> Modelo = Preço.
No qual quando eu selecionar o modelo da máquina com base na sua categoria o campo preço será preenchido automaticamente.
Para isso eu estou usando o sample da "Northwind" e criei uma comboBox e uma tabela "Categories" e já a relacionei com a tabela "Products".
No VBA eu escrevi o seguinte para selecionar o modelo conforme sua categoria :
Private Sub cboCategories_AfterUpdate()
Me.cboProducts.RowSource = "SELECT ProductName FROM" & _
" Products WHERE CategoryID = " & Me.cboCategories & _
" ORDER BY ProductName"
End Sub
Porém agora não sei como escrever para que o preço que eu especifiquei para cada modelo na tabela "Products" apareça no campo "Unit Price" do formulário, quando eu selecionar o modelo.
Alguém pode me ajudar, coloquei o arquivo em anexo?
Muito Obrigada.