? Saber como criar controles no Microsoft Excel ajuda você a fazer a sua aplicação mais dinâmica. Excel, um aplicativo de planilha , pode usar os controles para fornecer ao usuário mais controle de seus dados. Um controle ComboBox é uma combinação de uma caixa de texto e uma caixa de listagem . O usuário pode digitar um item da lista na caixa de texto para que a caixa de lista exibir uma lista de itens que ele pode selecionar. Usar o Visual Basic for Applications (VBA) para criar dinamicamente um controle. Instruções
1
lançamento do Excel 2003 e clique no menu Ferramentas. Selecione Basic Editor Macro e , em seguida, Visual . Insira um novo módulo clicando no menu Inserir e selecione Module. Digite o seguinte para criar um novo procedimento :
Private Sub createDropDownList ()
On Error GoTo Err_createDropDownList :
2
Digite o seguinte para criar dinamicamente um novo ComboBox controle na planilha ativa Excel:
Com ActiveSheet.OLEObjects.Add ( ClassType : = " Forms.ComboBox.1 " , Link: = False , _
DisplayAsIcon : = False , Left : = 70 , Top : = 60, _
Largura: = 100, Altura: . . = 25)
Com objeto
AddItem " Lista de Itens 1"
AddItem "Lista item 3"
AddItem " Lista de Itens 2".
.
End With
End With
Este código também irá adicionar . três itens para o controle ComboBox
3
Digite o seguinte para sair do procedimento e tratar erros :
Exit_createDropDownList :
Exit Sub
Err_createDropDownList :
MsgBox Err.Description Resume
Exit_createDropDownList :
End Sub
4
Pressione " F5" para executar o procedimento . Você verá um novo controle ComboBox criado em sua planilha.