salvar dados de uma combobox em tabela

SQL

07/08/2014

Pessoal, bom dia!

Estou criando uma ordem de serviço com VBA e nesta coloquei uma combobox que seleciona o código do equipamento de uma tabela de cadastro dos equipamentos, porém não estou conseguindo fazer com que esse valor fique salvo na minha tabela de dados da Ordem de serviço, seleciono o valor mas ele não fica salvo. alguém poderia me ajudar.
OBS; a tabela que busco o dado que carrega a combobox é diferente da tabela salva os dados da OS

Desde já agradeço

Segue abaixo o codigo que estou usando

Private Sub UserForm_Initialize()

Call DefinePlanilhaDados
Call HabilitaBotoesAlteracao
Call CarregaDadosInicial
Call DesabilitaControles
Call CarregaCategorias
Call CarregaEquipamentos

End Sub

Private Sub CarregaEquipamentos()
Dim linha As Integer, coluna As Integer
linha = 2
coluna = 1
Me.ComboBoxCodFrota.Clear
With Sheets("Equipamentos")
Do While Not IsEmpty(.Cells(linha, coluna))
Me.ComboBoxCodFrota.AddItem .Cells(linha, coluna).Value
linha = linha + 1
Loop
End With
End Sub
Gleidson Alves

Gleidson Alves

Curtidas 0
POSTAR