URGENT
Les étudiants qui n’ont pas pu passer l’examen partiel la semaine
dernière sont priés de me contacter rapidement soit :
-
-
Soit par téléphone : demander au secrétariat
Dernier TP. Programmation avec VB
Objectif :
Manipuler les objets de types suivants d’une application Excel :
- Objet de type worksheet (une feuille de calcul).
- Objet de type range (une plage)
Manipuler les opérations suivantes d’une application Excel
- Copie d’une plage
- Tri d’une plage
- Mise en forme d’une plage
Manipuler un tableau de données
- Calcul moyenne, maximum, minimum etc.
- Calcul tableau effectif
- Recherche dans un tableau
- Calcul quartiles (médiane etc.)
Travail à faire
Chargez le classeur excel TD9.xls
ou le fichier source du programme codeSouce.txt
(à insérer dans une feuille de module VB pour Excel)
-
Tester programme après programme :
-
tester structure après structure
- en enlevant les "apostrophes" devant les lignes
-
Modifiez, compléter ces programmes
C'est l'unique moyen de vraiment apprendre à programmer. Se limiter à
comprendre et à exécuter des programmes faits par un tiers ne suffisent pas.
Programmes à construire en plus
-
recherche d'un nombre X dans un tableau trié:
sortir de la boucle avec 'exit for' quand on a trouvé le nombre X ou quand
on a rencontré un nombre > X
calcul tableau des effectifs par taille, age moyen par taille, age
minimal par taille
Rappels sur les objets d'une application Excel
Un objet peut être défini par l'ensemble de:
ses propriétés (une couleur, la dimension, la valeur etc.) dont on
modifie les valeurs
et de ses méthodes (sous programmes pour effacer, copier, trier, calculer
etc.) auxquelles on fait appel pour modifier les propriétés de l'objet lui
même ou d'autres objets
Exemples
Objet de type worksheet (feuille de calcul)
- La collection des feuilles est worksheets (au pluriel)
- Worksheets(1).name = « données »
- Worksheets(1).activate()
Worksheet(2).copy after:= worksheets(3)
Objet de type range (une plage ou une cellule)
- worksheets(2).range("A1", "B10").count (le
nombre de cellule)
- worksheets(2).range("A1", "B10").rows (le nombre de
lignes)
- worksheets(2).range("A1", "B10").interior.colorindex =
12
- worksheets(3).range("A2", "B6").copy cells("A5")
- range("A2", "B6").sort cells("A2")
- range("A2", "B6").clearContents
- range("A2", "B6").clearFormats