Illustration de la propriété End de l’objet Range dans Excel VBA

Cet exemple illustre la propriété End de l’objet Range dans Excel VBA. Nous utiliserons cette propriété pour sélectionner la plage de la cellule active à la dernière entrée d’une colonne.

Quelques chiffres de ventes dans la colonne A. Supposons que vous ajouterez d’autres chiffres de ventes au fil du temps.

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

1. Pour sélectionner la dernière cellule d’une colonne, ajoutez simplement la ligne de code suivante:

Range("A7").End(xlDown).Select

Remarque: Au lieu de Range(“A7”), vous pouvez également utiliser Range(“A6”), Range(“A2”), etc. Cette ligne de code équivaut à appuyer sur Fn+ Flèche de bas.

Résultat lorsque vous cliquez sur le bouton de commande sur la feuille:

2. Pour sélectionner la plage de la cellule A8 à la dernière entrée de la colonne, ajoutez la ligne de code suivante:

Range (Range("A8"), Range ("A8"). End(xlDown)). Select


Résultat lorsque vous cliquez sur le bouton de commande sur la feuille:

3. Pour sélectionner la plage de la cellule active à la dernière entrée de la colonne, remplacez simplement Range (“A8”)  par ActiveCell.

 Range(ActiveCell, ActiveCell.End (xlDown)).Select

Résultat lorsque vous sélectionnez la cellule A2 et cliquez sur le bouton de commande sur la feuille:

 Remarque: vous pouvez utiliser les constantes xlUp, xlToRight et xlToLeft pour vous déplacer dans les autres directions. De cette façon, vous pouvez sélectionner une plage de la cellule active à la dernière entrée consécutive.

S’abonner
Notifier de
0 Commentaires
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x
()
x