form_macros2

Prévia do material em texto

Crie um arquivo no Excel contendo as seguintes planilhas: Principal, Clientes, Pedido (BOTÃO 
DIREITO DO MOUSE – INSERIR – PLANILHA)
Na planilha Clientes 
1. Preencha células B4, C4, D4 e E4 com as palavras Código, Nome, Endereço e Telefone, 
respectivamente.
Na planilha Pedido 
2. Preencha células C4, D4, E4, F4 e G4 com as palavras Código, Cliente, Produto, Preço e 
Parcelamento, respectivamente.
3. Na célula G5, digite a fórmula = SE(a5=”à vista”;f5;-PGTO(b5;a5;f5;0;0))
Obs.: a célula A5 referencia a quantidade de parcelas e a célula B5 referencia a taxa de juros.
4. Arraste a fórmula de G5 até G30
Na planilha Principal (DESENVOLVEDOR – MODO DE DESIGN)
5. Insira três botões, sendo eles referentes a Cadastro de Cliente, Pesquisa de Cliente, Pedido 
(DESENVOLVEDOR-INSERIR-CONTROLES ACTIVEX- BOTÃO).
6. Mude o nome e o label de cada um dos três botões de acordo com palavras em vermelho no 
item 7 (BOTÃO DIREITO DO MOUSE – PROPRIEDADES – (NAME) – CAPTION).
7. Insira o código VBA correspondente a cada botão, fazendo as devidas modificações, destacadas 
em vermelho. As palavras em azul e sublinhadas devem ser retiradas pois são apenas 
explicativas ( BOTÃO DIREITO DO MOUSE – EXIBIR CÓDIGO)
Pesquisa de Cliente
Private Sub Pesquisa_Cliente_Click()
End Sub
Pedido
Private Sub Pedido_Click()
' mostra um formulário 
Form_Pedido.Show
End Sub
Cadastro de Cliente
Private Sub Cadastro_Cliente_Click()
' mostra um formulário
Form_Cadastro_Cliente.Show
End Sub
8.Crie os formulários seguintes ( VISUAL BASIC – INSERIR – UserForm). Mude o nome de cada 
componente dos formulários de acordo com o que está apresentado na figura. (PROPRIEDADES – 
(NAME)).
9– Digite o Código do formulário Cadastro de cliente.
10 – Digite o código do formulário Pedido .
11- Insira uma planilha teste.
1ª Fase: Macro com referências Absolutas
1. Acione a gravação da macro. Atribua-lhe o Short Key Ctrl+P
2. Certifique-se que o botão Relative Reference está desactivado.
3. Clique na célula B3.
4. Escreva FATEC
5. Formate a célula para Bold, Itálico, tamanho 18, Small Caps,… (utilize o Format / Font)
6. Na célula B4 escreva: Parque Tecnológico
7. Na célula B5 escreva: SJC
8. Pare a gravação da macro. – A macro está criada.
9. Apague tudo o que escreveu nas células da coluna B.
10. Clique na célula L8.
11. Carregue simultaneamente nas teclas Ctrl e P
12. O que aconteceu ?
2ª Fase: Macro com referências Relativas
1. Seleccione a célula D5.
2. Accione a gravação da macro. Atribua-lhe o Short Key Ctrl+R
3. Selecione o botão Relative Reference.
4. Escreva FATEC na célula que havia sido selecionada.
5. Formate a célula para Bold, Itálico, tamanho 18, Small Caps,… (utilize o Format / Font)
6. Na célula D6 escreva: Parque Tecnológico
7. Na célula D7 escreva: SJC
8. Pare a gravação da macro. – A macro está criada.
9. Apague tudo o que escreveu nas células da coluna D.
10. Clique na célula L8.
11. Carregue simultaneamente nas teclas Ctrl e R
12. O que aconteceu ? Por quê ?