formulários em Microsoft Office Excel pode ajudá-lo a apresentar os dados de forma clara e diretamente , em vez de referenciá-los em um arquivo no seu disco rígido. O caminho mais rápido para importar dados para uma forma de uma planilha é usando o Visual Basic for Applications (VBA). VBA é uma linguagem de programação de computador utilizado para automatizar tarefas manuais em aplicativos do Microsoft Office, como o Excel. Faça o seu pedido mais user-friendly , exibindo dados da planilha através de formulários . Instruções
1

Abra o Microsoft Office Excel e digite " 2" na célula "A1 ", "3" na célula " B1 ", "4" na célula " C1 " e " 5" na célula " D1 ". Pressione " Ctrl" e "S" para salvar a planilha. Guarde-o em "C: \\ Temp" como " source.xlsx " e feche a planilha
2

lançamento Excel para abrir um novo livro. . Clique na guia "Desenvolvedor" e clique em "Visual Basic". Clique no menu "Inserir" e clique em " UserForm1 " para adicionar um novo formulário.
3

Clique em " ComboBox " no painel " Toolbox" e arraste-o para a sua forma , mantendo o seu mouse botão. Solte o botão do mouse para criar um novo controle combo- box. Adicione um novo botão de comando usando a mesma técnica.
4

duplo clique em " CommandButton1 " para abrir o processo clique com o evento para o botão. Comece por adicionar o seguinte código VBA para criar as variáveis ​​usadas para abrir a planilha :

Dim sourceXL Como Excel.Application

Dim MANUAL Como Excel.Workbook

Dim sourceSheet Como Excel.Worksheet
5

Adicione o seguinte código para abrir a planilha " source.xlsx " :

Definir sourceXL = Excel.Application

Definir MANUAL = sourceXL . Workbooks.Open ("C: \\ Temp \\ source.xlsx " )

Set sourceSheet = sourceBook.Sheets (1)
6

Digite o código a seguir para obter os valores de " source.xlsx " e adicioná-los à caixa de combinação no formulário :

sourceSheet.Range ( " A1 ") . Selecione

Me.ComboBox1.AddItem ( sourceSheet.Range (" A1 " ) . Value)

sourceSheet.Range ( "B1" ) . Selecione

Me.ComboBox1.AddItem ( sourceSheet.Range ( "B1" ) . Value)

sourceSheet . Range (" C1" ) . Selecione

Me.ComboBox1.AddItem ( sourceSheet.Range ( "C1" ) . Value)

sourceSheet.Range ( "D1 " ) . Selecione < br >

Me.ComboBox1.AddItem ( sourceSheet.Range ( "D1 " ) . Value)
7

Teste o seu programa com a tecla " F5" e clicando no botão de comando para encher sua caixa de combinação.