|
 Saberexcel - o site de quem precisa aprender Macros Microsoft Excel VBA
Esses procedimentos do Aplicativo Microsoft Excel VBA(Visual Basic Application), mostram como carregar dados em um objeto Combobox,
de acordo com a
Private Sub ComboBox1_Click()
[L65000].End(xlUp).Offset(1, 0).Select
ActiveCell.Value = ComboBox1.Value
Frame1.Caption = "Nome inserido [ " & ComboBox1.Value & "]"
Frame1.ForeColor = H000040C0&
End Sub
Private Sub UserForm_Initialize()
'carregar uma combobox com auxílio de instrução with
With Worksheets("Auxiliar")
UserForm1.ComboBox1.List = .Range("B4:B" & .Range("B4").End(xlDown).Row).Value
End With
' UserForm1.ComboBox1.List = Saber1.Range("B4:B38").Value 'limitando o range
SendKeys "%{down}"
End Sub
Private Sub cmdFechar_Click()
Unload Me
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
 |