VBA-Leçon 5. Propriétés (Properties)

Dans cet article, nous apprendrons comment écrire du code VBA pour contrôler le contenu des cellules, les cellules elles-mêmes et les lettres.

Une propriété est un attribut d'objet qui définit l'une des caractéristiques de l'objet, comme sa taille, sa couleur ou sa position à l'écran, ou un aspect de son comportement, par exemple s'il est activé ou visible à l'écran.

Pour modifier les caractéristiques d'un objet, vous devez modifier la valeur de ses propriétés.

1. Écrivez les valeurs dans la cellule

Tout d'abord, ouvrez l'éditeur, ajoutez un module, copiez-y cette macro :

Sub Properties() 'moonexcel.com.ua
   Range ("A1")
End Sub

Nous nous sommes tournés vers la cellule A1. Essayons maintenant de contrôler cette cellule. Pour voir ce que nous pouvons faire, ajoutons un point après Range ("A1").

Sélectionnez Value et appuyez sur Tab. Nous obtiendrons le code suivant :

Sub Properties() 'moonexcel.com.ua
        Range ("A1").Value
End Sub

La valeur Value affiche le contenu de la cellule.

Écrivons maintenant la valeur 35 dans la cellule A1 :

Sub properties() 'moonexcel.com.ua
   Range("A1").Value = 35
   'La valeur de la cellule A1 est 35
End Sub

Essayons maintenant d'écrire le texte dans la cellule (lors de l'attribution d'une valeur de texte, elle doit être placée entre guillemets "") :

Sub properties() 'moonexcel.com.ua
   Range("A1").Value = "Il y a du texte ici"
End Sub

Notez que la macro affichera les valeurs dans la feuille que vous avez ouverte pour la dernière fois. Par conséquent, afin de contrôler le contenu d'une cellule sur n'importe quelle feuille du livre, nous devrons écrire le chemin complet de la cellule, à savoir ajouter le nom de la feuille au début du code, par exemple :

Option 1. Nous appliquons par le nom de la lettre - Sheets("Sheet2").

Sub properties() 'moonexcel.com.ua
   Sheets("Sheet2").Range("A1").Value = "Il y a du texte ici"
   'Cela signifie : ouvrez la feuille 2, sélectionnez la cellule A1 et écrivez le texte dans sa valeur
End Sub

Option 2. Nous postulons non pas par le nom de la lettre, mais par son numéro de série - Sheets(2).

Sub properties() 'moonexcel.com.ua
   Sheets(2).Range("A1").Value = "Il y a du texte ici"
End Sub

De même, si l’on veut faire référence à une cellule d’un autre classeur, il faut écrire le nom du classeur au début du code :

Sub properties() 'moonexcel.com.ua
   Workbooks("Book2.xlsx").Sheets("Sheet2").Range("A1").Value = "Il y a du texte ici"
End Sub

Bien que nous spécifions le paramètre Value dans nos exemples, il peut en fait être omis car il s'agit de la valeur par défaut. Autrement dit, ces deux lignes de code seront équivalentes :

Sub properties() 'moonexcel.com.ua
   Range("A1").Value = 35
   Range("A1") = 35
End Sub

2. Suppression de valeurs

Supprimons la valeur 35 de la cellule A1, que nous avons enregistrée au début de la leçon :

Sub properties() 'moonexcel.com.ua
   Range("A1").Clear
   'Signifie : sélectionnez la cellule A1 et effacez-la
End Sub

3. Formatage des valeurs

Si vous sélectionnez Font, une liste de propriétés apparaîtra que vous pouvez appliquer à la cellule :

Formatage : modifier la taille du texte

Fixons la cellule à 35 et réduisons la taille de la police à 8 :

Sub properties() 'moonexcel.com.ua
   Range("A1") = 35
   Range("A1").Font.Size = 8
End Sub

Mise en forme : mettre le texte en gras

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Bold = True
End Sub

Éliminer les sécrétions grasses :

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Bold = False
End Sub

Mise en forme : mettre le texte en italique

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Italic = True
End Sub

Formatage : souligner le texte

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Underline = True
End Sub

Formatage : définir le type de police

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Name = "Arial"
End Sub

Formatage : colorer la cellule

Sub properties() 'moonexcel.com.ua
   Range("A1").Interior.ColorIndex = 6
End Sub