| Descricao: |
 Saberexcel - o site de quem precisa Aprender Macros Microsoft Excel VBA
Esse exemplo de procedimento do Aplicativo Microsoft Excel VBA(Visual Basic Application), usando o objeto ComboBox, retornam valores multi-dados, isto é, retornam valores classe relacionado ao código do produto, observe que a propriedade Offset esta direcionando para busca dos na coluna(A), da folha de planiha 'bd'. Observe que o valor retornado do código é automaticamente é inserido a correspondência do código. Baixe o exemplo de planiha contendo o procedimento com o Evento no final da página. Fiquem com Deus. Expedito Marcondes.
Private Sub ComboBox2_Change()
ComboBox1.Text = Sheets("bd").Range("A:A").Find(ComboBox2.Text).Offset(0, 1) 'buscando multidados classe baseado no código.
'Worksheets("bd").Range("A" & i + 1).Value = ComboBox1.Text 'somente para teste em outra folha de planilha.
'abaixo os códigos retornaram os valores para a folha de planilha sequencia a medida em que o combobox for sendo clicado.
[H65000].End(xlUp).Offset(1, 0).Select
ActiveCell.Value = ComboBox1.Value
ActiveCell.Offset(0, 1).Value = ComboBox2.Value
'nesta linha de código retorna para célula [B12] os valores das combobox selecionadas,
[B12].Value = "Dados Selecionados - { CLASSE [ " & ComboBox1.Value & " ] ---- CÓDIGO...: [ " & ComboBox2.Value & " ] }"
[E1].Select
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
Publicidade
Compre com segurança, garantia e ótimos preços
|