Faire référence à des cellules par rapport à d'autres cellules

Une façon courante d’utiliser une cellule par rapport à une autre cellule consiste à utiliser la propriété Offset . Dans l'exemple suivant, le contenu de la cellule située une ligne en dessous et trois colonnes à droite de la cellule active de la feuille de calcul est affectée d'un soulignement double.

Sub Underline() 
 ActiveCell.Offset(1, 3).Font.Underline = xlDouble 
End Sub

Note Vous pouvez enregistrer des macros qui utilisent la propriété Offset pour spécifier des références relatives au lieu de références absolues. Pour cela, sous l’onglet Développeur, cliquez sur Avec des références relatives, puis cliquez sur Enregistrer une macro.

Pour exécuter une boucle sur une plage de cellules, utilisez une variable avec la propriété Cells dans une boucle. L'exemple suivant montre comment remplir les 20 premières cellules de la troisième colonne avec des valeurs comprises entre 5 et 100, avec un incrément de 5. La variable counter est utilisée comme index de ligne pour la propriété Cells.

Sub CycleThrough() 
 Dim counter As Integer 
 For counter = 1 To 20 
 Worksheets("Sheet1").Cells(counter, 3).Value = counter * 5 
 Next counter 
End Sub

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.