Crowdly

Sub effacer_B2()

MsgBox"Etes-vous certain de vouloir supprimer le contenu de B2?",

"Demande de confirmation" = vbYes Then

Range("B2").ClearContents

MsgBox "Le contenu de B2 a été effacé !"

End If

End Sub

Sub effacer_B2()

If MsgBox("Etes-vous certain de vouloir supprimer

le contenu de B2 ?", vbYesNo, "Demande de confirmation") = vbYes

Then

Range("B2").ClearContents

MsgBox "Le contenu de B2 a été effacé !"

End If

End Sub

Sub effacer_B2()

If InputBox("Etes-vous

certain de vouloir supprimer le contenu de B2 ?", vbYesNo, "Demande

de confirmation") = vbYes Then

Range("B2").ClearContents

MsgBox "Le contenu de B2 a été effacé !"

End If

End Sub

Une procédure VBA qui commence par la ligne suivante est de quelle

nature ?

Sub MaProcédure()

Privée

Publique

Fastidieuse

Complexe

En considérant le code suivant, combien de fois le

traitement sera-t-il réalisé ?

Nbtours = 12

For n=1 to nbtours

totalscore = nbtours - 2

Next n

un nombre illimité

5 fois

10 fois

12 fois

Nous

exécutons la macro calc_cube() et nous souhaitons utiliser la fonction

cube(nombre), quelle est l’instruction manquante

Function

cube(nombre)

cube = nombre ^ 3

End Function

Sub

calc_cube()

Dim nombre As Double

Dim resultat As Double

nombre

= InputBox("Le cube de quel nombre voulez- vous calculer ?")

???????????

MsgBox

resultat

End Sub

resultat = nombre^3

resultat = cube()

resultat = cube(nombre)

resultat = cube(nombre*nombre*nombre)

Pour

obtenir la clé du numéro de la sécurité sociale (SS correspondant à la variable

et la clé correspond à deux derniers chiffres), on écrit :

Left(ss,2)

Right(2,ss)

Left(2,ss)

Right(ss,2)

Nous

exécutons la macro calc_carre() et nous souhaitons utiliser la fonction

carre(nombre), quelle est l’instruction manquante

Function

carre(nombre)

carre = nombre ^ 2

End Function

Sub

calc_carre()

Dim nombre As Double

Dim resultat As Double

nombre

= InputBox("Le carré de quel nombre voulez- vous calculer ?")

???????????

MsgBox

resultat

End Sub

resultat = carre(nombre)

resultat = nombre^2

resultat = carre(nombre*nombre)

resultat = carre()

A la lecture du code suivant, quel sera la valeur de la

variable Mention ?

MaNote=0

If MaNote > 0 Or

MaNote <=20 Then

If MaNote < 10 then

Mention = « Ajourné »

ElseIf MaNote >=10 Then

Mention= « Reçu »

EndIf

Ajourné

Reçu

Ce traitement ne permet pas

de déterminer la valeur de la variable Mention

Mention ? Quelle mention ?

Je souhaite

réaliser une impression de 150 factures à l’aide d’une procédure VBA. Quelle

est la structure la plus appropriée ?

FOR i= 1 to 150

……

NEXT i

Do UNTIL condition

……

Loop

……

Loop WHILE condition

FOR n= 1 to 150

……

NEXT i

Qu’est ce qui caractérise une procédure VBA Publique ?

Une procédure VBA est publique lorsqu’elle a été codée par le

secteur Public

Une procédure VBA est publique lorsque l’on peut accéder à son code

source

Une procédure VBA publique

permet d’utiliser le traitement dans d’autres procédures ou modules

Une procédure VBA publique n’est utilisable qu’au sein

du module où elle a été exécutée

Pour

tester qu’une variable entière i est différente de 0, on écrit :

i < 0> Then

If i <>0 Then

i diff 0 Then

i ><0 Then