VBA : Comment obtenir la valeur d’une cellule à partir d’une autre feuille

Vous pouvez utiliser les méthodes suivantes dans VBA pour obtenir la valeur de la cellule dans une autre feuille :

Méthode 1 : obtenir la valeur d’une cellule à partir d’une autre feuille

Sub GetCellAnotherSheet()
ActiveCell.Value = Worksheets("Sheet2").Range("A2") 
End Sub

Cette macro particulière obtiendra la valeur de la cellule A2 dans Sheet2 et la renverra dans la cellule actuellement active.

Méthode 2 : obtenir le résultat de l’opération des valeurs de cellule à partir d’une autre feuille

Vous pouvez également effectuer une opération sur les cellules d’une autre feuille et renvoyer le résultat de l’opération dans la cellule actuellement active.

Par exemple, vous pouvez utiliser la syntaxe suivante pour additionner les valeurs de la plage B2:B10 dans Sheet2 et renvoyer la somme dans la cellule actuellement active :

Sub GetCellAnotherSheet()
ActiveCell.Value = WorksheetFunction.Sum(Worksheets("Sheet2").Range("B2:B10"))
End Sub

Les exemples suivants montrent comment utiliser chaque méthode dans la pratique.

Exemple 1 : obtenir la valeur d’une cellule à partir d’une autre feuille

Supposons que nous ayons la feuille suivante appelée Sheet2 qui contient des informations sur divers joueurs de basket-ball :

Supposons que la cellule A2 de la feuille Sheet1 soit actuellement sélectionnée comme cellule active.

Nous pouvons créer la macro suivante pour obtenir la valeur dans la cellule A2 de Sheet2 et la renvoyer dans la cellule actuellement active :

Sub GetCellAnotherSheet()
ActiveCell.Value = Worksheets("Sheet2").Range("A2") 
End Sub

Lorsque nous exécutons cette macro, nous pouvons voir que la valeur de la cellule A2 de Sheet1 est désormais définie sur « Mavs », ce qui correspond à la valeur de la cellule A2 de Sheet2 :

Exemple 2 : obtenir le résultat de l’opération des valeurs de cellule à partir d’une autre feuille

Supposons encore une fois que nous ayons la feuille suivante appelée Sheet2 qui contient des informations sur divers joueurs de basket-ball :

Nous pouvons utiliser la macro suivante pour additionner les valeurs de la colonne de points de Sheet2 et renvoyer le résultat dans la cellule actuellement active, qui se trouve être la cellule A2 de Sheet1 :

Sub GetCellAnotherSheet()
ActiveCell.Value = WorksheetFunction.Sum(Worksheets("Sheet2").Range("A2"))
End Sub

Lorsque nous exécutons cette macro, nous pouvons voir que la somme des valeurs dans la plage A2:A10 de Sheet2 est désormais affichée dans la cellule A2 de Sheet1 :

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :

VBA : Comment définir la valeur d’une cellule dans une autre feuille
VBA : Comment sélectionner une plage dans une cellule active
VBA : Comment supprimer des lignes en fonction de la valeur de la cellule