Quel est le code VBA permettant d'exploiter la réponse à l'interface suivante ?

Analysez le code suivant pour déterminer la valeur de la variable MaVar à la fin du traitement.

Option Explicit

Quelle est la valeur par défaut d’un tableau de type Variant en VBA après une déclaration sans affectation ?

Quel type de tableau faut-il utiliser si l'on veut stocker une plage de cellules Excel contenant des types de données variés ?

On souhaite faire la somme

de plusieurs nombres positifs en arrêtant ce calcul lors de la saisie de 0.

On procède ensuite au calcul de la moyenne de ces nombres. Le code ne fonctionne pas. Pourquoi ?

Sub moyenne_nombres()

Dim

somme As Double, x As Double, n As Integer

 x=0

    n=0

somme=0

 Do While x=­0

     somme=somme+x

      n=n+1       

Loop

x=InputBox("Entrez un nombre réel")     

MsgBox"Moyenne des " & n & " nombres = "

& somme/n

End

Sub