Cours 1 : rappels de VBA/Excel
Cécile Le Pape cecile.lepape@lip6.fr

1

Rappels sur Excel
• Excel = Tableur
  

Collection de feuilles (worksheet) composées de cellules (cells). Un cellule est l’intersection entre une lignes et une colonne. Les feuilles sont regroupées en classeurs (workbook).

2

Editeur de code VBE

1 - Fenêtre VBAProject. Elle présente les différents projets ouverts et permet de naviguer facilement entre vos différentes feuilles de codes VBA. 2 - Fenêtre Code. C'est l'endroit ou vous allez saisir votre code VBA. 3 - Fenêtre Propriétés. Propriétés de l'objet sélectionné. 4 - Fenêtre Exécution. Elle permet de tester une partie du code. Elle peut s'avérer très utile pour voir comment s'exécutent certaines lignes de code.
3

Ecrire un programme VBA/Excel
1. Ouvrir l’éditeur de code VBE 2. Insertion > Module 3. Définition du code
1. 2. 3.

Déclaration des variables globales Définition des procédures et des fonctions personnalisées Définition d’une macro (procédure sans paramètre) Placer le curseur dans la macro à exécuter Cliquer sur F5

4. Exécution d’un programme
1. 2.

4

Exemple de module
Const nbmax As Integer = 10 ‘nombre max de changements de couleur ‘ définition d’une fonction qui calcule un indice de couleur aléatoire Function couleur() As Integer couleur = 1 + Rnd() * 56 End Function ‘définition d’une procédure qui prend en paramètre un numéro de ligne et un numéro de colonne ‘ et qui modifie la couleur de fond de la cellule aléatoirement Sub ChangeCouleur(ByVal ligne As Integer, ByVal colonne As Integer) Cells(ligne, colonne).Interior.ColorIndex = couleur End Sub ‘ définition d’une procédure sans paramètre (ou macro) qui demande à l’utilisateur les coordonnées ‘ d’une cellule et qui modifie 10 fois son fond, avec un intervalle de 1 seconde entre 2 couleurs Sub test() Dim l, c As Integer Dim nb As Integer nb = 0 Randomize l = InputBox("ligne?") c = InputBox("colonne ?") While nb < nbmax ChangeCouleur l,