Шукаєте відповіді та рішення тестів для L2 Economie Gestion Programmation VBA QCM TD S4 2025? Перегляньте нашу велику колекцію перевірених відповідей для L2 Economie Gestion Programmation VBA QCM TD S4 2025 в moodle-exam.unistra.fr.
Отримайте миттєвий доступ до точних відповідей та детальних пояснень для питань вашого курсу. Наша платформа, створена спільнотою, допомагає студентам досягати успіху!
Quelle instruction permet de déclarer un tableau dynamique en VBA ?
A la lecture du code suivant, que se passera-t-il si l'utilisateur choisit Abandonner ?
Sub Extraction()Dim pib As DoubleDim pays As StringDim rep, erreur As Byte
erreur=0
i=1
Saisie:pays = InputBox("Quel est le pays dont vous voulez extraire les données ?", "Extraction de données")Do While Cells(i , 1) <> pays i = i + 1Looppib = Cells(i , 2)If pib = "N/A" Then rep = MsgBox("Les données pour le " & pays & " ne sont pas significatives. Souhaitez vous poursuivre ?", vbQuestion + vbAbortRetryIgnore, "Données macroéconomiques") If rep = 3 Then GoTo Fin ElseIf rep = 4 Then GoTo Saisie Else MsgBox "Données non significatives" GoTo Saisie erreur=erreur+1
End IfEnd IfFin:
MsgBox "Il y a eu " & erreur & " erreurs d'extraction pendant cette session"
End Sub
A la lecture du code suivant, que se passe-t-il si l'utilisateur clique sur OUI ?
Sub Extraction()Dim pib As DoubleDim pays, pays2 As StringDim rep As Bytepays = InputBox("Quel est le pays dont vous voulez extraire les données ?", "Extraction de données")rep = MsgBox("Souhaitez vous analyser une autre série de données que celle du " & pays & "?", vbQuestion + vbYesNoCancel, "Données macroéconomiques")If rep = 7 Then MsgBox "Extraction en cours des données du pays " & paysElseIf rep = 2 Then MsgBox "Fin des extractions"Else pays2 = InputBox("Quel est le pays dont vous souhaitez associé les données à ceux de " & pays & " ?", "Extraction de données")End IfEnd Sub
Comment récupérer la valeur du premier indice du tableau tab en VBA ?
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
Sub rollercoaster()Dim Mavar As IntegerDim i, j As Bytei = 1For j = 1 To 100 Do Mavar = Mavar + 1 i = i + 1 Loop While i / 2 = Int(i / 2) NextMsgBox MavarEnd SubQuelle 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
Quelle boucle garantit au moins une exécution du bloc de code, même si la condition de sortie est remplie dès le début ?