Ci-dessous, nous examinerons un programme qui boucle dans une plage définie.

Par exemple, lorsque l’on veut carré les nombres Range ( « A1: A3 »). Saviez-vous que vous pouvez aussi la boucle par un lien: / vba-exemples dynamiques gamme [dynamique]? Situation:

Loop through Defined Range in Excel VBA

Placez un bouton de commande sur votre feuille de calcul et ajoutez les lignes de code suivant:

  1. Tout d’abord, nous déclarons deux objets Range. Nous appelons les objets Range RNG et la cellule.

Dim rng As Range, cell As Range

  1. Nous initialisons l’objet Range RNG avec Range ( « A1: A3 »).

Set rng = Range("A1:A3")

  1. Ajouter la boucle For Each suivante.

For Each cell In rng

Next cell

Note: RNG et cellules sont choisies au hasard ici, vous pouvez utiliser tous les noms.

N’oubliez pas de se référer à ces noms dans le reste de votre code.

  1. Ensuite, nous carré chaque cellule dans cette gamme. Pour ce faire, ajoutez la ligne de code suivant à la boucle:

cell.Value = cell.Value * cell.Value

Lorsque vous cliquez sur le bouton de commande sur la feuille:

Loop through Defined Range Result

  1. Si vous voulez vérifier chaque cellule dans une plage sélectionnée au hasard, remplacez simplement:

Set rng = Range("A1:A3")

avec:

Set rng = Selection

  1. Maintenant, par exemple, sélectionner la plage ( « A1: A2 »).

Loop through Selection in Excel VBA

Lorsque vous cliquez sur le bouton de commande sur la feuille:

Loop through Selection Result