UserForms , também chamados de caixas de diálogo, são janelas gráficas que permitem que os usuários insiram dados em campos e inserir esses dados em planilhas do Excel . Um formulário de usuário é incorporado em uma planilha do Excel e é executado quando um usuário abre o arquivo Excel, normalmente através de uma macro. Porque UserForms tirar proveito da linguagem Visual Basic , podem ser generosamente personalizado para garantir que os dados inseridos seus campos é completo e válido , antes de serem transferidos para a planilha do Excel em si para posterior manipulação. Coisas que você precisa
Microsoft Excel com Visual Basic Editor
Show Mais instruções
Como transferir dados de um formulário de usuário para uma planilha
1
Abra o Microsoft Excel e criar uma nova pasta de trabalho em branco , clicando no menu Arquivo e selecione " New ". Salve o arquivo do Excel como " update_worksheet.xls ".
2
Mantenha a pasta de trabalho aberta e abrir o Editor do Visual Basic pressionando Alt- F11. Criar um novo formulário de usuário clicando no menu Inserir e selecionando " UserForm ". Nomeie o formulário de usuário " transferForm " alterando o atributo Nome no menu Propriedades. Altere o atributo legenda para " transferForm ".
3
Adicione uma caixa de texto para o formulário selecionando uma caixa de texto na caixa de ferramentas e arraste -o no lugar no formulário. Nome caixa de texto " transferInput " na janela de propriedades . Se a caixa de ferramentas não estiver aberto, selecione o menu Exibir e Toolbox.
4
Adicionar um botão de atualização para o formulário selecionando um CommandButton na caixa de ferramentas e arraste -o no lugar no formulário. Nomeie o CommandButton " transferButton " na janela de propriedades e alterar o atributo legenda a "Planilha de Atualização ".
5
Adicionar um botão próximo ao formulário selecionando um segundo botão de comando da caixa de ferramentas e arrastando-o para colocar no formulário. Nomeie o CommandButton " closeButton " na janela de propriedades e alterar a legenda atribuir a "Close Form. "
6
Abra o editor de código do Visual Basic , clicando duas vezes sobre o transferButton ( botão de atualização ) . Adicione código para a função transferButton _CLICK () que transfere todos os dados inseridos no campo de texto para a planilha update_worksheet.xls quando o usuário clica no botão. Feche o editor de código do Visual Basic.
Sub transferButton_Click Privado ( )
Dim transferWorksheet como Planilha
Definir transferWorksheet = Worksheets ( "Sheet1" )
transferWorksheet . Cells (1,1) . Valor = Me.transferInput.Value
End Sub
7
Reabra o editor Visual Basic código , clicando duas vezes sobre o closeButton (botão fechar) . Adicione código para a função BotaoFecha_Click () que fecha o formulário quando o usuário clica no botão. Feche o editor de código do Visual Basic.
Private Sub BotaoFecha_Click ()
Unload Me End Sub
8
Execute o código do formulário clicando no menu Executar e selecionando " Run Sub /UserForm. " Insira os dados no campo de entrada e clique no botão " transferButton ". Certifique-se de que os dados são transferidos com sucesso para o primeiro valor da célula na planilha do Excel , a mudança para o Excel , se necessário. Salve e feche o formulário de usuário em execução.
9
Use um procedimento de evento Excel para abrir o formulário de usuário quando um usuário abre a pasta de trabalho no Excel. Abra o Project Explorer e clique duas vezes a janela de código ThisWorkbook . Digite uma macro que abre o formulário quando a planilha abre e salvar a macro. Salvar e fechar o Visual Basic e update_worksheet.xls .
Private Sub Workbook_Open ()
transferForm.Show
End Sub
10
Reabrir " update_worksheet.xls . " O formulário de usuário transferForm será aberta. Digite algum texto no campo " transferInput " e clique no " transferButton ". O texto inserido no transferForm UserForm será transferido para a primeira célula na Sheet1 em update_worksheet.xls .