Exercice : While

Pour chaque procédure :

  • Coder en VBA dans un module nommé tantQue

  • Créez un bouton sur la feuille Tant que

Question

sub recherche_1()

Affiche "bravo" si on retrouve un nombre donné par un premier utilisateur

Indice

Utilisez InputBox et MsgBox

Question

sub recherche_2()

Idem plus affiche trop grand ou trop petit.

Question

sub recherche_3()

Idem plus donne le nombre d'essais effectués.

Question

sub recherche_4()

Idem plus 10 propositions max.

Question

sub sommeNombre()

Demande des nombres.

Arrête quand le nombre vaut 0.

Affiche la somme des nombres.

Question

sub moyenneNombre()

Demande des nombres.

Arrête quand le nombre vaut 0.

Affiche la moyenne des nombres.

Question

sub maxMin()

Demande des nombres.

Arrête quand le nombre vaut 0.

Affiche le max et le min sans tenir compte du 0.

Question

sub demandeTQ()

Demande des nombres tant qu'ils sont différents de 0 ou tant que la somme est plus petite que 100.

Affiche la somme des nombres.