Comment utiliser ActiveCell dans VBA dans Excel ?

Dans VBA, la cellule active est une propriété qui représente la cellule qui est active en ce moment. Lorsque vous sélectionnez une cellule ou accédez à une cellule et que cette case verte couvre cette cellule, vous pouvez utiliser la propriété ACTIVECELL pour faire référence à cette cellule dans un code VBA. Il y a des propriétés et des méthodes qui vont avec.

Utiliser la propriété de cellule active

1. Tapez le mot-clé « ActiveCell ».
2. Tapez un point (.) pour obtenir les propriétés et les méthodes de la liste.
3. Sélectionnez la propriété ou la méthode que vous souhaitez utiliser.
4. Exécutez le code pour effectuer l’activité sur la cellule active.

Les points importants

• Lorsque vous utilisez la propriété de cellule active, VBA fait référence à la cellule active de la feuille active du classeur actif , quel que soit le nombre de classeurs ouverts en ce moment.
• ActiveCell est finalement une cellule dotée de toutes les propriétés et méthodes d’une cellule normale.

Activer une cellule à partir de la plage sélectionnée

Pour activer une cellule à l’aide d’un code VBA, vous pouvez utiliser une méthode « Activer » et une méthode « Sélectionner » de deux manières.

Sub vba_activecell()

'select and entire range
Range("A1:A10").Select

'select the cell A3 from the selected range
Range("A3").Activate

'clears everything from the active cell
ActiveCell.Clear

End Sub

Le code ci-dessus, tout d’abord, sélectionne la plage A1: A10, puis active la cellule A3 à partir de cela et à la fin, efface tout de la cellule active, c’est-à-dire A3.

Valeur de retour de la cellule active

Le code suivant renvoie la valeur de la cellule active à l’aide d’une boîte de message .

MsgBox ActiveCell.Value

Ou si vous souhaitez obtenir la valeur de la cellule active et la coller dans une cellule séparée.

Range("A1") = ActiveCell.Value

Définir la cellule active sur une variable

Vous pouvez également définir la cellule active sur la variable , comme dans l’exemple suivant.

Sub vba_activecell()

'declares the variable as range
Dim myCell As Range

'set active cell to the variable
Set myCell = ActiveCell

'enter value in the active cell
myCell.Value = Done

End Sub

Obtenir le numéro de ligne et de colonne de l’ActiveCell

Avec la cellule active, il existe une propriété de ligne et de colonne que vous pouvez utiliser pour obtenir le numéro de ligne et de colonne de la cellule active.

MsgBox ActiveCell.Row

MsgBox ActiveCell.Column

Obtenir l’adresse de la cellule active

Vous pouvez utiliser la propriété address pour obtenir l’adresse de la cellule active.

MsgBox ActiveCell.Address

Lorsque vous exécutez le code ci-dessus, il vous montre une boîte de message avec l’adresse de cellule de la cellule active de la feuille active du classeur actif (comme je l’ai mentionné plus tôt).

Déplacer de la cellule active à l’aide du décalage

Avec la propriété offset, vous pouvez vous déplacer vers une cellule située à plusieurs lignes et colonnes de la cellule active.

ActiveCell.Offset(2, 2).Select

Sélectionnez une plage dans la cellule active

Et vous pouvez également sélectionner une plage à partir de la cellule active.

Range(ActiveCell.Offset(1, 1), ActiveCell.Offset(5, 5)).Select