Bastian Flores

Prezados, boa noite. Preciso fazer funcionar minha userfomr da seguinte forma. Preciso fazer com que os dados inseridos dentro, sejam computados automaticamente numa linha do meu banco de dados. Podem me ajudar? Meu código é o seguinte: Private Sub Cmb_Modelo_Change() End Sub Private Sub UserForm_Activate() Me.Cmb_Marca.Clear Me.Cmb_Modelo.Clear Linha_Leitura = 16 Do Marca = Worksheets("Dados Auxiliares").Cells(Linha_Leitura, 1) If Marca = "" Then Exit Do Me.Cmb_Marca.AddItem Marca Linha_Leitura = Linha_Leitura + 1 Loop Linha_Leitura = 16 Do Modelo = Worksheets("Dados Auxiliares").Cells(Linha_Leitura, 2) If Modelo = "" Then Exit Do Me.Cmb_Modelo.AddItem Modelo Linha_Leitura = Linha_Leitura + 1 Loop End Sub Se alguém puder me ajudar, eu agradeço. BASTIAN