Help VBA (sujet annales) - VB/VBA/VBS - Programmation
MarshPosté le 24-09-2013 à 22:47:21
Etant en master Gestion des risques financiers, je fais du VBA en informatique. Le prof va assez vite et j'ai du mal à comprendre. Voici un sujet d'annales qu'il a proposé :
Question 1 Renommez le module "Module" en "Essai". (ok lol) Dans la fonction « Essai_Fonction_Longue », remplacez les caractères «AAAA», «BBBB»,«CCCC» et «DDDD» en fonction des instructions ci-dessous: - Le contenu de la cellule active doit apparaître dans la variable «Prix_n».
- Le contenu de la cellule au-dessous de la cellule active doit apparaître dans la variable«Prix_n_1».
- Complétez la ligne de code commençant par «Inflation». Le taux d’inflation doit être transféré dans la variable.
- Le résultat final doit apparaître dans la cellule située deux lignes au-dessous de la cellule active.
Le module en question se présente comme suit:
Sub Essai_Fonction_Longue() ' Solution détaillée avec l'utilisation de variables Dim Inflation As Double ' Variable pour le taux d'inflation Dim Prix_N As Double ' Variable pour indice des prix de l'année n Dim Prix_N_1 As Double ' Variable pour indice des prix de l'année n-1
' Récupération des données à partir de la cellule courante Prix_N = AAAA Prix_N_1 = BBBB ' Calcul du taux d'inflation Inflation = CCCC ' Restitution du résultat DDDD
End Sub
Il faut donc remplacer les groupes de 4 lettres selon les indications au-dessus. Mais je ne comprends rien :S Pouvez vous m'aider s'il vous plait !
Question 2 À l’ouverture du classeur, le calcul du taux d’inflation doit être effectué automatiquement. Programmez cette fonction.
=> Il me semble qu'il faut mettre la formule sous une fonction et l'inclure dans"thisworkbook" option "open", non ?
Marsh Posté le 24-09-2013 à 22:47:21
Etant en master Gestion des risques financiers, je fais du VBA en informatique. Le prof va assez vite et j'ai du mal à comprendre. Voici un sujet d'annales qu'il a proposé :
Question 1
Renommez le module "Module" en "Essai". (ok lol)
Dans la fonction « Essai_Fonction_Longue », remplacez les caractères «AAAA», «BBBB»,«CCCC» et «DDDD» en fonction des instructions ci-dessous:
- Le contenu de la cellule active doit apparaître dans la variable «Prix_n».
- Le contenu de la cellule au-dessous de la cellule active doit apparaître dans la variable«Prix_n_1».
- Complétez la ligne de code commençant par «Inflation». Le taux d’inflation doit être transféré dans la variable.
- Le résultat final doit apparaître dans la cellule située deux lignes au-dessous de la cellule active.
Le module en question se présente comme suit:
Sub Essai_Fonction_Longue()
' Solution détaillée avec l'utilisation de variables
Dim Inflation As Double ' Variable pour le taux d'inflation
Dim Prix_N As Double ' Variable pour indice des prix de l'année n
Dim Prix_N_1 As Double ' Variable pour indice des prix de l'année n-1
' Récupération des données à partir de la cellule courante
Prix_N = AAAA
Prix_N_1 = BBBB
' Calcul du taux d'inflation
Inflation = CCCC
' Restitution du résultat
DDDD
End Sub
Il faut donc remplacer les groupes de 4 lettres selon les indications au-dessus. Mais je ne comprends rien :S Pouvez vous m'aider s'il vous plait !
Question 2
À l’ouverture du classeur, le calcul du taux d’inflation doit être effectué automatiquement.
Programmez cette fonction.
=> Il me semble qu'il faut mettre la formule sous une fonction et l'inclure dans"thisworkbook" option "open", non ?