O título deste documento contém linguagem inapropriada.

Ficha 9 – Excel&VBA – Estruturas Repetitivas
1. Abra o livro de trabalho com o nome Ficha-VBA-4.xlsm que se encontra no Moodle.
2. Guarde uma cópia deste ficheiro na sua pasta/PEN pessoal.
Deve repetir esta operação frequentemente.

Ciclos
3. No editor VBA encontra a subrotina tabuada(), que apresenta a tabuada de um dado número:
I. Teste a subrotina…
II. Crie uma subrotina tabuada_N() de forma mostrar as tabuadas duma sequência de números introduzidos pelo utilizador. A sequência termina com um valor negativo.

4. Crie uma subrotina que, dados 6 números reais, mostre a soma, o maior, e a média dos valores inseridos pelo utilizador:
I. Usando um ciclo FOR
II. Comente o ciclo anterior, copie/duplique o código do ciclo e altere-o para um ciclo DWL

5. Crie uma subrotina que leia um número inteiro positivo N, menor que 30, e mostre ao utilizador todos os números pares existentes entre 1 e N, de acordo com:
I. Apresentando os números pares por ordem crescente. Exemplo: 2 4 6 8 ...
II. Apresentando os números pares por ordem decrescente. Exemplo: ... 8 6 4 2

6. Crie uma subrotina para calcular o resultado da expressão: n deverá ser um número inteiro positivo (validar)

∑𝑛𝑖=1

2𝑖
√𝑛

7. Crie uma subrotina que calcula e mostra o factorial de todos os valores existentes no intervalo de números inteiros positivos [0 – N]. Coloque os números na coluna C da folha VBA e os respectivos factoriais na coluna D, a partir da 4ª linha.

8. Crie uma subrotina que, para um conjunto (range) de células selecionado no Excel (ex.: F4:F20), atribui a cada célula existente nesse conjunto um valor numérico aleatório entre 1 e 100.
Utilize a função Math.Randomize, a função Math.Rnd, e a propriedade Range.Value. (ajuda/help F1)
Sugestão: veja o For Each…Next das aulas teóricas 

Pág. 1/2

APROG-LEM

Ficha 9

Trabalho Para Casa (TPC):
9. Criar uma subrotina que determina todos os números primos inferiores a um dado número N, e os
apresenta