Variables et objets VBA : types, portée, tableaux, Set, Range, graphiques, Enum et feuilles protégées

On déclare une variable avec Dim nom As Type, en tête de procédure. Dim client As String réserve du texte ; Dim valeur As Variant (ou Dim valeur sans type) accepte n’importe quoi, au prix de plus de mémoire et d’erreurs repérées plus tard. Dans un code existant, les déclarations se reconnaissent aux mots Dim, Private, Public, Static et Const. Option Explicit en tête de module force la déclaration : une variable mal orthographiée devient une erreur au lieu d’une nouvelle variable vide.

Le type fixe ce que la variable peut contenir et la place qu’elle occupe. Long pour les entiers (compteurs, numéros de ligne), Double pour les décimaux, Currency pour les montants (4 décimales exactes), String pour le texte, Boolean pour Vrai/Faux, Date pour les dates et heures, Variant quand le contenu est imprévisible, Object ou un type précis (Range, Worksheet) pour les objets.

La portée dit qui voit la variable, et sa durée de vie combien de temps elle garde sa valeur. Dim dans une procédure : variable locale, remise à zéro à chaque appel. Static dans une procédure : locale mais conservée entre les appels. Private (ou Dim) en tête de module : visible par toutes les procédures du module. Public en tête d’un module standard : visible dans tout le projet. Les variables de module et publiques vivent tant que le classeur est ouvert et que le code n’est pas réinitialisé.

Un tableau (array) range plusieurs valeurs sous un même nom, repérées par un indice : Dim mois(1 To 12) As String. Un tableau dynamique se déclare sans taille, Dim t() As Double, puis se dimensionne avec ReDim ; ReDim Preserve agrandit sans perdre le contenu. LBound et UBound donnent les bornes. t = Range("A2:C8").Value charge une plage dans un tableau à deux dimensions en une seule instruction : c’est bien plus rapide qu’une boucle sur les cellules.

Une variable objet reçoit sa valeur avec Set : Dim r As Range puis Set r = Range("A1").CurrentRegion. Sans Set, VBA essaie d’affecter la valeur de la plage et renvoie l’erreur 91. L’objet Range désigne une ou plusieurs cellules ; on s’y déplace avec Offset, on le redimensionne avec Resize, CurrentRegion prend le bloc de données autour d’une cellule et End(xlUp) trouve la dernière cellule remplie. Set r = Nothing libère la variable.

Un graphique incorporé est un ChartObject (le cadre sur la feuille) qui contient un Chart (le graphique lui-même). ActiveSheet.ChartObjects.Add(Left, Top, Width, Height) crée le cadre, .Chart.SetSourceData fixe les données, .Chart.ChartType le type (xlColumnClustered, xlBarClustered, xlPie, xlLine), .Chart.HasTitle et .Chart.ChartTitle.Text le titre. Chaque série se pilote par SeriesCollection(1).

Une constante garde la même valeur pendant toute l’exécution : Const TAUX_TVA As Double = 0.2. Elle rend le code lisible et se modifie en un seul endroit. VBA et Excel fournissent déjà des centaines de constantes : vbYes, vbCrLf, xlUp, xlColumnClustered. Une énumération (Enum, en tête de module) regroupe des constantes entières liées ; sans valeur explicite, chaque membre vaut le précédent + 1, en partant de 0. IntelliSense propose ensuite les membres.

Les fonctions de conversion transforment une valeur dans un type précis : CCur (Currency), CDbl, CLng, CInt, CStr, CDate. Elles suivent les paramètres régionaux de Windows (virgule décimale, date jj/mm/aaaa) et déclenchent l’erreur 13 si la conversion est impossible. D’où l’intérêt des fonctions de test : IsDate vérifie qu’un texte est une date valide, IsNumeric qu’il est un nombre. Attention, Val ne lit que le point décimal.

Une feuille de données protège ses formules et sa structure tout en laissant saisir dans les cellules déverrouillées. En VBA : ws.Protect Password:="…", UserInterfaceOnly:=True protège contre l’utilisateur mais laisse les macros écrire. Ce réglage n’est pas enregistré avec le fichier : on le réapplique dans Workbook_Open. D’autres arguments autorisent le filtre ou la mise en forme ; EnableSelection = xlUnlockedCells limite la sélection aux cellules de saisie, et une feuille de paramètres peut passer en xlSheetVeryHidden.