Microsoft Excel 2007 é mais do que linhas e colunas de dados. Suas poderosas ferramentas incluem fórmulas, funções, gráficos, tabelas dinâmicas e filtragem . Além disso , o Excel vem com sua própria linguagem de programação , Visual Basic for Applications (VBA ) . Ao gravar uma macro, nos bastidores, Excel traduz suas teclas em código VBA. Com o Editor do Visual Basic, você pode editar o código gravado e escrever o seu próprio. Use VBA para dar ao seu projeto uma vantagem profissional . Criar uma caixa de diálogo personalizada , em seguida, vestir-se com a imagem de sua escolha. Instruções
Crie um formulário de usuário
1 Sua forma usuário pode incluir uma imagem de flores do jardim .
Abra o Editor do Visual Basic. Clique em " Visual Basic " na seção "Código" da guia "Desenvolvedor" .
2
Selecione View> Project Explorer a partir do menu , selecione Exibir> Propriedades.
< Br >
3
Selecione Inserir> UserForm no menu. Você verá um formulário de usuário em branco e caixa de ferramentas Controles.
4
Adicione uma caixa de texto ao formulário. Na caixa de ferramentas controles , passe o mouse sobre os ícones para encontrar a caixa de texto , que se parece com " ab ". Clique no ícone . Clique no formulário de utilizador para colocar a caixa de texto no formulário, colocando-o sobre o direito de deixar espaço para um rótulo, e deixando espaço acima e abaixo.
5
Adicione um rótulo para o formulário. Encontre "Rótulo" na caixa de ferramentas ( que parece um grande A). Usando o mesmo método , coloque um rótulo à esquerda da caixa de texto .
6
Adicione dois botões de comando . Encontre " CommandButton " na caixa de ferramentas . Use o mesmo procedimento para colocar dois botões de comando lado a lado na parte inferior do formulário.
7
Clique no rótulo no formulário de utilizador . Na janela de propriedades , ao lado de " Legenda, " mudança " Label1 " para "Enter Name".
8
Clique na caixa de texto no formulário do usuário . Na janela de propriedades , ao lado de " (nome) , " mudança " TextBox1 " para " name_txt ".
9
Clique no primeiro botão de comando no formulário de utilizador . Na janela de propriedades , ao lado de " (nome) , " mudança " CommandButton1 " para " OK_btn ". Ao lado de " Legenda, " mudança " CommandButton1 " para " OK".
10
Clique no segundo botão de comando no formulário de utilizador . Na janela de propriedades , ao lado de " (nome) , " mudança " CommandButton2 " para " Cancel_btn ". Ao lado de " Legenda, " mudança " CommandButton2 " para " Cancelar ".
11
Adicionar uma imagem para o formulário do usuário . Na caixa de ferramentas Controles, clique no controle de imagem , que se parece com duas montanhas e do sol. Clique no formulário de utilizador para colocar a caixa de imagem no formulário.
12
Clique no controle de imagem que você colocou no formulário de utilizador . Na janela de propriedades , ao lado de "Picture ", clique nos três pontos (...) à direita. Navegue até uma imagem salva no seu computador, como C: \\ Users \\ Public \\ Pictures \\ Sample Pictures \\ garden.jpg para uma exposição de flores de laranjeira. Clique duas vezes na imagem selecionada .
13
Mover e redimensionar controles no formulário de utilizador até que você esteja satisfeito com o design.
Adicionar código e executar a rotina < br >
14 Construa uma lista de nomes em sua planilha Excel.
Dê um duplo clique no botão " OK" no formulário de utilizador para abrir uma janela de código. Você vai ver o começo e as declarações de encerramento para o sub-rotina
15
Adicione o código entre o " Private Sub " e declarações " End Sub" para que ele lê a seguinte: .
Privada Sub OK_btn_Click ()
Dim LastRow As Long
LastRow = Worksheets ( "Sheet1" ) . Range (" A65536 " ) . End ( xlUp ) . Row + 1
Cells ( LastRow , 1). Valor = name_txt
End Sub
Este código coloca o nome da caixa de texto na célula A1 na planilha do Excel. Cada vez que o usuário entra em um novo nome e clicar em "OK", ele será adicionado por baixo.
16
Clique duas vezes em UserForm1 Na janela do projeto. Dê um duplo clique no botão cancelar. Na janela de código , adicione o código entre o " Private Sub " e " End Sub ", para que a rotina é a seguinte:
Private Sub Cancel_btn_Click ()
UserForm1.Hide
End Sub
Este código oculta a caixa de diálogo quando o usuário clicar em "Cancelar ".
17
Executar a rotina. Selecione Executar > Executar Sub /UserForm no menu. Você vai voltar para o Excel e ver a caixa de diálogo , incluindo a sua imagem seleccionada.
18
Digite um nome na caixa de texto e clique em "OK ". Você vai ver o nome na célula A1. Digite outro nome e clique em "OK". Você vai ver o nome na célula A2 .
19
Clique em " Cancelar" para ocultar a caixa de diálogo.