Comment déclarer des constantes
Pour déclarer une constante dans VBA, utilisez the keyword Const, suivi du nom de la constante, du type de données et de la valeur que vous souhaitez définir. Voici un exemple de déclaration d’une constante :
Const PI As Double =3.14159 ' Declares PI constant
Const WELCOME_MESSAGE As String =“Welcome !” 'Declares welcome message constant
Une fois déclarée, vous pouvez utiliser cette constante dans votre code comme une variable normale, mais la valeur ne peut pas être modifiée :
Constantes intégrées et personnalisées
VBA a de nombreuses constantes intégrées qui aident à l’écriture de code. Ces constantes préexistaient et sont souvent utilisées pour réguler des propriétés, des méthodes ou des fonctions existantes.
1. Constantes pour MsgBox :
- vbOKOnly : Affiche uniquement le bouton « OK ».
- vbYesNo : Affiche les boutons « Oui » et « Non ».
- vbInformation : Affiche l’icône d’information.
Exemples d’utilisation :
Sub ShowMessage()
MsgBox “Do you want to continue ?”, vbYesNo + vbInformation, “Confirm”
End Sub
2. Constantes d’alignement :
- xlCenter : aligne le texte au milieu.
- xlLeft : Aligne le texte sur la gauche.
- xlRight : Aligne le texte sur la droite.
Exemples d’utilisation :
Sub SetAlignment()
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets(1)
Ws. Cells(1, 1). Value =“Welcome”
Ws. Cells(1, 1). HorizontalAlignment = xlCenter
End Sub
3. Constantes pour la couleur :
- vbRed : Rouge.
- vbGreen : Vert.
- vbBlue : Bleu.
Exemples d’utilisation :
Sub ShowColor()
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets(1)
Ws. Cells(1, 1). Value =“Red Color”
Ws. Cells(1, 1). Font.Color =vbRed
End Sub
Apprendre à connaître l’énumération
L’énumération est un ensemble de constantes interdépendantes avec des noms, utilisées pour représenter une valeur spécifique dans un code. Avec l’énumération, les programmeurs peuvent utiliser des noms plus évidents que les nombres ou les valeurs littérales, ce qui rend le code plus facile à lire et à gérer. L’énumération permet de regrouper des valeurs qui ont des relations logiques, ce qui facilite la compréhension et la gestion du code.
L’importance de l’utilisation de l’énumération dans la programmation comprend :
- Les noms dans l’énumération sont plus faciles à comprendre que les nombres littéraux ou les chaînes.
- Réduit le risque de fautes de frappe ou d’utilisation de valeurs incorrectes, car seuls les noms valides des énumérations peuvent être utilisés.
- Aide à structurer le code de manière plus organisée, ce qui facilite la mise à jour et la maintenance.
Exemples d’utilisation de l’énumération dans le code
Pour créer une énumération dans VBA, utilisez le mot-clé Enum, suivi du nom de l’énumération et d’une liste de valeurs pertinentes. Voici des exemples de création et d’utilisation de l’énumération :
Enum DaysOfWeek
Sunday
Monday
Tuesday
Wednesday
Thursday
Friday
Saturday
End Enum
Sub ShowDayExample()
Dim today As DaysOfWeek
today = Wednesday ' Using the name of the enumeration
Select Case today
Case Sunday
MsgBox “Today is Sunday.”
Case Monday
MsgBox “Today is Monday.”
Case Tuesday
MsgBox “Today is Tuesday.”
Case Wednesday
MsgBox “Today is Wednesday.”
Case Thursday
MsgBox “Today is Thursday.”
Case Friday
MsgBox “Today is Friday.”
Case Saturday
MsgBox “Today is Saturday.”
End Select
End Sub
' Calling a procedure to display the days
ShowDayExample()
Dans cet exemple, nous créons un DaysOfWeek enumeration that includes the names of the days of the week. In the ShowDayExample subroutine, we assign the value of today to one of the names of the enumerations. Using the Select Case, nous pouvons donner la bonne réponse en fonction de la valeur d’aujourd’hui.
L’utilisation d’une telle énumération facilite non seulement la lecture du code, mais aussi les modifications futures, telles que l’ajout ou la modification du nom du jour sans avoir à rechercher et à remplacer chaque utilisation d’une valeur littérale dans le code.