Baixe o app para aproveitar ainda mais
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ê ?
Compartilhar