Les variables, les constantes

Les types de données

Il existe des centaines de types de données, mais vous verrez ici les types de données les plus répandus et basiques qui vous serviront toujours.

Dim b As Byte 
b = 45 

Dim i As Integer 
i = 11235 

Dim l As Long 
l = 11235813 

Dim s As Single 
s=7E-3 
'est équivalent à  
s=0.007 

Déclaration multiple

Si vous avez plusieurs variables à utiliser dans votre programme, par exemple une variable dtDateExamen de type Date, ainsi qu’une variable strTitreExamen de type String, et une autre variable strSalle, également de type String, vous avez plusieurs façons de les déclarer.

'Déclarations ligne par ligne (similaire à la déclaration vue dans le
sous-chapitre précédent) 
Dim dtDateExamen As Date 
Dim strTitreExamen As String 
Dim strSalle As String 
'Déclarations séparées par des virgules (le plus courant) 
Dim dtDateExamen As Date, strTitreExamen As String, 
strSalle As String  
'Déclarations sur plusieurs lignes (1 ligne par type de donnée)  
Dim dtDateExamen As Date  
Dim strTitreExamen As String, strSalle As String  
'Déclarations sur une seule ligne (peu fréquent et peu lisible) 
Dim dtDateExamen As Date : Dim strTitreExamen As String : Dim strSalle 
As String 

Exemple 12 : les différentes façons d’effectuer des déclarations multiples

Comme chacune des façons de déclarer les variables est équivalente aux autres, utilisez celle qui vous apparaît comme la plus facile pour vous.

Convertir un type de données en un autre

Comme vous le verrez durant la lecture de cet ouvrage, il peut parfois être utile de transformer un type de données en un autre type de données, pour manipuler la donnée plus facilement.

Qu’il s’agisse de passer d’une valeur numérique au texte, de transformer du texte en date, ou encore de transformer une date en valeur numérique, il existe plusieurs fonctions qui permettent ces conversions. Le verbe également utilisé pour cette conversion est "caster", qui peut apparaître dans certaines documentations. On pourra dire "caster en date".

Par exemple, pour convertir une chaîne de caractères en valeur numérique entière, vous pouvez utiliser la fonction CInt(), ou encore pour convertir une valeur numérique en valeur booléenne, vous pouvez utiliser la fonction CBool().

?CInt("1123") 
1123 
?CBool(0) 
Faux 

Pour qu’une conversion se fasse, il faut bien entendu que la valeur une fois convertie appartienne bien à l’intervalle des valeurs autorisées par son type converti. Les conversions entre valeurs numériques sont relativement peu courantes, alors que celles entre chaînes de caractères ou dates vers valeur numérique, et inversement, sont plutôt fréquentes. 

Voici un tableau des fonctions de conversions...

Les tableaux

Dim NomDuTableau(TailleDuTableau) As TypeDeDonnee 
'exemple 
Dim TabString(8) As String 

Option Base 0 
Dim Semaine(6) As String 
Semaine(0)="Lundi" 
Semaine(1)="Mardi" 
Semaine(2)="Mercredi" 
Semaine(3)="Jeudi" 
Semaine(4)="Vendredi" 
Semaine(5)="Samedi" 
Semaine(6)="Dimanche" 

Les constantes

Certaines choses changent, et d’autres ne changeront jamais. Lorsque vous souhaitez garder des valeurs inchangées durant les programmes, vous avez la possibilité de le faire au travers des constantes. Il existe également des constantes directement disponibles dans Office, que vous avez vu par exemple dans le chapitre Communiquer avec l’utilisateur - MsgBox et InputBox.

Les constantes de l’utilisateur

Si en tant que développeur, vous souhaitez stocker une valeur qui ne pourra pas être modifiée, vous pouvez déclarer une constante avec le mot-clé Const. La syntaxe générale de déclaration d’une constante est la suivante :

Const NomDeVotreConstante [As TypeDeVotreConstante]= ValeurConstante 

Par exemple, pour déclarer une constante AGE_MAJORITE de type numérique entier et de valeur 18, la déclaration sera la suivante :

Const AGE_MAJORITE As Integer = 18 

Exemple 29 : déclaration d’une constante

Une fois la déclaration effectuée, il n’est pas possible d’affecter une autre valeur à une constante. Dans l’exemple suivant, lors de l’exécution du code, un message d’erreur apparaîtra à l’écran.

Const AGE_MAJORITE As Integer = 18 
AGE_MAJORITE = 19 

Exemple 30 : tentative de modifier la valeur d’une constante

Il est intéressant...

Convention de nommage

Afin de vous rendre le travail plus facile, mais aussi parce que VBA vous fixe des limites, la façon dont vous nommerez variables et constantes n’est pas totalement libre. Bien que chaque entreprise puisse avoir sa propre nomenclature de nommage, voici les règles qui sont les plus communément admises et suivies dans le cadre du développement d’outils VBA.

Un nom unique pour les variables

Pour commencer, il n’est pas possible d’avoir deux variables du même nom à l’intérieur d’une même portée (cette notion est évoquée avec plus de détails dans le chapitre Procédures, fonctions et macros). Ainsi un code comme le suivant générera une erreur.

Dim a As Integer 
Dim a As Date 

Exemple 31 : interdiction d’avoir deux variables avec le même nom.

L’erreur qui s’affichera alors à l’écran sera la suivante :

'Vous préférerez par exemple utiliser  
Dim dtArrivee As Date 
'À 
Dim dtArrivée As Date 

Exercices

Pour chaque chapitre, vous serez amené à rédiger vos propres programmes. Les solutions sont mises à disposition dans le chapitre Correction des exercices.

Pour ce chapitre, créez un module portant le nom/numéro du chapitre, et dans ce module, créez une macro pour chaque exercice Private Sub TitreExercice() dans lequel vous placerez vos instructions.

Pour afficher une valeur à l’utilisateur, vous pourrez utiliser l’instruction MsgBox suivie de la variable que vous souhaitez afficher.

Terminez l’exercice en exécutant la macro, en appuyant sur la touche F5. Les résultats attendus à l’écran seront indiqués entre parenthèses. Aucune erreur ne doit survenir lors de la compilation ni lors de l’exécution.

Private Sub Variables_Constantes_Exercice1() 
End Sub