Le langage VBA

1. La syntaxe de déclaration

Tout comme les fonctions et procédures, pour qu’une variable puisse être appelée et utilisée, il faut la déclarer. La syntaxe de déclaration d’une variable est la suivante :

Dim NomDeVariable As TypeVariable 

Le mot-clé Dim sert à déclarer une variable. Il est suivi du nom de la variable. Après le mot-clé As se trouve le type de la variable. Il existe plusieurs types de données qu’il est possible de manipuler en VBA.

Lorsqu’on présente son chien, on indique son prénom et sa race (« Snoopy, cocker »), et pour utiliser une variable, on l’appelle par son nom.

2. Les types de données

Il existe plusieurs types de données (car on a également des constantes).

Tout comme il existe plusieurs races de chiens.

Dim b As Byte 
b = 13 

Dim i As Integer 
i = 28 

Dim l As Long 
l = 52 

1. Les tableaux de taille fixe

On détermine un tableau de taille fixe lorsque celle-ci est définie lors de la déclaration de la variable.

Option Base 0 
Dim Tableau(3) As Date 

L’indice 3 spécifie la taille du tableau. Le décompte des éléments peut commencer à 0 ou à 1 selon la définition de l’instruction Option Base. Si aucune information n’a été précisée, Option Base 0 est la valeur par défaut. As Date détermine le type des données contenues dans le tableau, ici des dates.

Il s’agira donc d’un tableau...

1. Les opérateurs numériques

+, -, *, / : opérateurs mathématiques des opérations élémentaires

+ : addition

1 + 2 = 3 

- : soustraction

6 - 5 = 1 

* : multiplication

4 * 9 = 36 

/ : division

42 / 6 = 7 

\ : pour la division entière

8 \ 3 = 2 

^ : puissance

2 ^ 4 = 2 * 2 * 2 * 2 = 16 

mod : modulo

Le modulo retourne le reste de la division entière d’un nombre par un autre.

25 mod 3 = 1' (car 25 = 3 * 8 + 1) 

2. Les opérateurs de chaînes de caractères

& : concaténation

Pour concaténer deux chaînes de caractères entre elles, on utilise le symbole esperluette « & ». À noter que l’opérateur + peut également fonctionner, mais des erreurs peuvent survenir si vous utilisez cet opérateur, car il est déjà utilisé pour les variables numériques.

"Bonjour " & "à tous" = "Bonjour à tous" 

3. Les opérateurs de dates

+ : addition

#01/12/2020# + 365 = #01/12/2021# 

- : soustraction

#04/10/2016# - 4 = #04/06/2016# 

4. Les opérateurs booléens, opérateurs logiques

And : opérateur ET

True And False = False 

Or : opérateur OU

True Or False = True 

Not : opérateur NON

Not True = False 

Xor : opérateur OU EXCLUSIF

Xor permet de déterminer si c’est l’un ou l’autre, mais pas les deux en même temps.

True Xor False = True 
False Xor False = False 
True Xor True = False 

Eqv : opérateur EQUIVALENT

Eqv retourne...

1. Déclaration d’une procédure

La déclaration d’une procédure en VBA est faite avec le mot-clé Sub selon la syntaxe suivante :

[Private ou Public] Sub Nom_de_Procedure([param_1 As Type_Param, ...]) 
    'Commentaires 
    Instructions 
End Sub 

Nom_de_Procedure est le nom de la procédure et param_1 le nom d’un paramètre de type Type_Param. L’expression entre crochets [Private ou Public] signifie que l’on peut ajouter si on le souhaite un des mots-clés Public ou Private, utilisés pour définir le caractère public ou privé de la procédure. Si aucun de ces mots-clés n’est utilisé, la procédure sera publique (Public) par défaut.

Une procédure publique peut être appelée depuis n’importe quel autre emplacement du programme. Une procédure privée ne peut être appelée que depuis une autre procédure (ou fonction) qui se situe dans le même module du programme.

Afin de rendre le code le plus compréhensible pour un utilisateur, il est possible d’ajouter des commentaires. Ces commentaires ne seront pas interprétés par l’ordinateur...

1. Déclaration d’une fonction

La déclaration d’une fonction en VBA est faite avec le mot-clé Function selon la syntaxe suivante :

[Private ou Public] Function Nom_Fonction([param_1 As Type_Param, ...]) 
As Type_Retour 
    'Commentaires 
    Instructions 
    Nom_Fonction = expression 
End Function 

Nom_Fonction est le nom de la fonction et param_1 le nom d’un paramètre de type Type_Param. Une fonction peut être déclarée avec zéro, un ou plusieurs paramètres. As Type_Retour permet de déterminer le type de valeur qui sera retournée par la fonction. L’expression entre crochets [Private ou Public] signifie que l’on peut ajouter si on le souhaite un des mots-clés Public ou Private, utilisés pour définir le caractère public ou privé de la fonction. Si aucun de ces mots-clés n’est utilisé, la fonction sera publique (Public) par défaut.

Voici un exemple de fonction, Le_Triple, qui prend un entier x en paramètre, et retourne le triple de sa valeur (x*3).

Function Le_Triple (x As Long) As Long 
    'Fonction retournant la valeur de x fois 3 
    Le_Triple = x * 3 
End Function 

Ainsi, étant donné un entier x, la fonction Le_Triple retourne la valeur x * 3, ce qui correspond au triple de x.

2. Appel d’une fonction

Pour exécuter une fonction, il suffit de l’appeler en écrivant son nom suivi des paramètres éventuels séparés...

1. Passage des paramètres

Lors de l’appel d’une fonction ou d’une procédure, il arrive parfois que le programme ait besoin d’une information pour fonctionner, comme par exemple la fonction Le_Triple qui a besoin d’avoir la valeur n pour retourner son triple. 

Notre chien a besoin de savoir quoi chercher : « va chercher… la balle ».

Les informations qui sont fournies à la procédure ou à la fonction sont nommées des paramètres (on utilise également le mot argument).

La balle est le paramètre pour le chien.

La syntaxe générale de passage d’un paramètre est la suivante :

[Optional] [ByRef ou ByVal] [ParamArray] <nom_parametre> [As Type_Param] 

Chacun des mots-clés a un impact sur la nature du paramètre.

Nom_parametre As Type_Param 

x as Long 

Nom As String, Prenom As String, Optional Nom_Jeune_Fille As String 

1. La portée

Lorsqu’on déclare et utilise des variables dans un programme, se pose la question de l’accessibilité de ces variables par rapport à l’ensemble du programme. Il existe plusieurs façons de déclarer des variables/constantes. Selon le mot-clé utilisé lors de la déclaration, la variable sera accessible seulement depuis certains points du programme. De la même façon, une variable peut n’être conservée que lors de l’exécution d’une procédure, ou durant toute l’exécution d’un programme.

On définit trois niveaux d’accès possibles :

Pour le chien, il s’agira d’une pièce de la maison.

Il s’agira de la maison entière

Il s’agira de l’intérieur et l’extérieur de la maison.

Dans l’exemple qui suit, la variable varProc a une portée de niveau procédure, la variable varModulePriv a une portée de niveau module et la variable varModulePublic a une portée de niveau projet.

Public varModulePublic...

1. Règle générale

Les noms d’objets, variables, constantes, fonctions et procédures sont assujettis à quelques règles par VBA :

On ne peut avoir deux Rantanplan dans une pièce, ni deux Milou dans la maison, ni encore deux Snoopy dehors.

Exemples de noms valides

Nom_Client 
NomClient 
Nom_1_Client 

On l’appellera Idefix au lieu d’Idéfix.

2. Convention de nommage des objets

D’une manière générale...

1. La structure de test If … Then … End If

If Condition_1 Then 
    Instruction_A 
[Else 
    InstructionB] 
End If 

If Age > 17 Then 
    bMajeur = True 
Else 
    bMajeur = False 
End If 

1. La boucle Do Loop

Il existe plusieurs structures de boucles Do Loop en VBA. À chaque structure sa syntaxe.

Do While ConditionATester 
    nstructions 
Loop 

Do  
    Instructions 
Loop While ConditionATester 

Do Until ConditionATester 
    Instructions 
Loop 

1. La fonction InputBox

Cette fonction affiche une boîte de dialogue dans laquelle l’utilisateur peut taper du texte ou cliquer sur un bouton, et la fonction retourne au programme le contenu de la zone de texte sous la forme d’une chaîne de caractères. Cette fonction VBA est déclarée de la façon suivante :

Public Function InputBox( _ 
    ByVal Prompt As String, _ 
    Optional ByVal Title As String = "", _ 
    Optional ByVal DefaultResponse As String = "", _ 
    Optional ByVal Xpos AS Integer = -1, _ 
    Optional ByVal YPos As Integer = -1, _ 
    Optional ByVal HelpFile As String = "", _ 
    Optional Context As Long) As String 

Comme vous pouvez le constater à la lecture de la déclaration de cette fonction, bon nombre des paramètres sont facultatifs. Voici à quoi ils correspondent :

1. Sortie de fonction : Exit Function

Il est possible de sortir d’une fonction avant la fin (End Function). Par exemple dans l’exemple suivant, le programme sortira de la fonction si le paramètre fourni est égal à -2 :

Function SiNonNul(x as Integer) As Boolean 
SiNonNul = False 
If x = -2 Then 
    Exit Function 
End If 
... 
End Function 

Dans le cas où la variable x passée en paramètre n’est pas égale à -2, le code se poursuit jusqu’à arriver à l’instruction de fin de fonction End Function.

2. Sortie de procédure : Exit Sub

Il est possible de sortir d’une procédure avant la fin End Sub. Par exemple dans l’exemple suivant, le programme sortira de la procédure si le paramètre fourni est une chaîne de caractères vide.

Sub SiNonVide(s as String) 
If s = "" Then 
    Exit Sub 
End If 
... 
End Sub 

Dans le cas où la variable s passée...

1. Les types d’erreurs possibles

Lorsque l’on code, il existe plusieurs erreurs possibles qui peuvent être faites à différents niveaux dans le code.

Sub AbsenceMotCleThen() 
    Dim a As Integer 
    'la ligne suivante est incomplète,  
    le mot-clé Then ayant été oublié 
    If a=3 
          a = a - + 5 
    End If 
End Sub