QCM3 - VBA

En répondant à ces 14 questions, vous pourrez apprécier partiellement l'étendue de vos connaissances en VBA sous Excel.

Cliquez sur le bouton Vérifier pour contrôler votre réponse à la question courante.
Votre résultat global apparaîtra quand vous aurez répondu à la dernière question.
Pour clôturer le test : cliquez sur le bouton Vérifier de la question 14.

 

1 - Soit l'instruction resul=IIf(x>y;1000;2000). Après l'exécution de cette instruction, resul contiendra la valeur 2000 si

  x est plus petit que y
  x est plus petit ou égal à y
  x est supérieur à y

 

 

2 - L'instruction Dim resul(10) As Byte définit un tableau de :

11 éléments du type Variant
11 éléments du type Byte
10 éléments du type Byte

 

 

3 - L'écriture If membre Then signifie :

si la variable membre vaut 1 Alors ...
si la variable membre vaut True Alors ...
cette écriture n'est pas correcte

 

 

4 - L'instruction Range("test").Formula = "=rand()" permet d'écrire

une constante alétoire dans chaque cellule de la plage test.
le libellé rand() dans chaque cellule de la plage test.
la fonction Alea() dans chaque cellule de la plage test.

 

 

5 - L'instruction on_off = ref1 = ref2 affecte à la variable on_off la valeur
(ref1 vaut 3 et ref2 vaut 4)

-1
False
True

 

 

6 - L'écriture cpt = cpt - 1 signifie

cette écriture n'est pas correcte
comparer cpt et cpt+1
décrémenter cpt de 1 unité

 

 

7 - L'instruction SendKeys "TABLEUR" & Chr$(13) permet de(d') :

écrire le mot TABLEUR dans la cellule active et de valider
copier le mot TABLEUR dans le Presse-Papiers
écrire le mot TABLEUR dans la cellule active

 

 

8 - L'instruction Application.OnKey Key:="{home}", Procedure:="" permet de(d') :

neutraliser la touche Home
rendre à la touche Home son rôle par défaut
associer à la touche Home une procédure par défaut

 

 

9 - Soit l'écriture While limite<>10. Elle signifie répéter tant que limite :

est supérieure à 10
est différente de 10
n'est pas inférieure à 10

 

 

10 - La boucle  For ind = 1 to 10 Step 3 permet d'affecter, dans la boucle, à ind les valeurs suivantes :

1, 2, 3, ..., 10
1, 4, 7, 10, 13
1, 4, 7, 10

 

 

11 - Que réalise la deuxième ligne du code suivant ?
     ladate = #07/12/1999#
     Debug.Print Mid$(ladate, 4, 2)

ce code est erroné car la première ligne comporte une erreur
elle stocke la valeur 12 dans la cellule courante
elle affiche 12 dans la fenêtre d'exécution

 

 

12 - L'instruction ActiveWorkbook.SaveAs FileName:="demo" permet de :
 

définir le nom par défaut du classeur courant
enregistrer le classeur courant en le nommant demo.
enregistrer le classeur courant en le nommant demo avec l'extension xls

 

 

13 - A votre avis, le mot WorkBooks désigne une :

  propriété
  collection
  méthode

 

 

14 - L'instruction For Each cell In Selection  permet de :

définir une plage 
parcourir une plage qui se nomme Selection
parcourir la plage sélectionnée avant cette ligne