Valeur VBA - Comment utiliser la propriété de valeur Excel VBA? (Exemples)

Propriété de valeur Excel VBA

La valeur est une propriété dans VBA qui est principalement utilisée avec la méthode de plage pour attribuer une valeur à une plage spécifique, c'est une expression intégrée dans VBA, par exemple, si nous utilisons plage («B3»). Value = 3 cela affectera cellule B3 une valeur de 3, pas nécessairement cette propriété de valeur doit être utilisée avec la seule méthode de plage, nous pouvons également l'utiliser avec d'autres fonctions.

Dès le début de notre apprentissage avec VBA, nous sommes tellement curieux d'apprendre comment stocker les données dans les cellules. Si vous êtes aussi curieux, vous devez comprendre la propriété «Value». Dans cet article, nous vous expliquerons la propriété «Value», comment insérer ou définir des valeurs, comment obtenir la valeur de la cellule et bien d'autres choses.

Dans l'un des articles précédents, nous avons discuté des «Cellules de plage VBA». L'objet Range peut nous aider à faire référence à une seule cellule ainsi qu'à plusieurs cellules. Pour utiliser d'abord l'objet RANGE, nous devons décider pour quelle cellule nous devons insérer la valeur et quelle est la valeur que nous allons insérer.

Comment utiliser Value Property dans VBA?

Exemple # 1 - Range Object pour attribuer des valeurs aux cellules

• Par exemple, si vous souhaitez insérer une valeur dans la cellule A1, vous devez faire référence à la cellule A1 comme cette plage («A1»)

Code:

Sub Value () Range ("A1") End Sub

• Après avoir référencé la cellule à l'aide de l'objet RANGE, placez maintenant un point (.) Pour voir la liste IntelliSense de toutes les propriétés et méthodes associées à cet objet.

Code:

Plage de sous-valeur () ("A1"). End Sub

• Dans cette variété d'options, sélectionnez la propriété "VALUE".

Code:

Sub Value () Range ("A1"). Value End Sub

• Une fois la propriété «VALUE» sélectionnée, nous devons définir la valeur sur la cellule A1 en mettant la valeur en signe égal.

Code:

Sub Value () Range ("A1"). Value = "Welcome to VBA" End Sub

• Ok, cela insérera la valeur «Welcome to VBA» dans la cellule A1.

• Si vous souhaitez insérer la même valeur dans plusieurs cellules, reportez-vous aux cellules comme le code ci-dessous.

Code:

Sub Value () Range ("A1: A5"). Value = "Welcome to VBA" End Sub

• Cela insérera la valeur de la cellule A1 à A5 .

• Si vous souhaitez insérer des valeurs dans différentes cellules mais pas pour des séries de cellules, nous devons utiliser le code et l'adresse de la cellule dans des arguments séparés comme ci-dessous.

Code:

Sub Value () Range ("A1, A5, B4, C2"). Value = "Welcome to VBA" End Sub

• Cela insérera le texte «Bienvenue dans VBA» dans les cellules A1, A5, B4 et C2 .

Exemple # 2 - Insérer une valeur à l'aide de la propriété CELLS

Pas via l'objet RANGE mais également en utilisant la propriété VBA CELLS, nous pouvons insérer des valeurs. Mais l'un des problèmes avec l'objet CELLS est que nous n'avons pas accès à la liste IntelliSense comme nous l'avons obtenu pour l'objet RANGE.

Ici, nous devons mentionner les numéros de ligne et de colonne dont nous avons besoin pour insérer la valeur. Par exemple, si vous souhaitez insérer la valeur dans la cellule A1, le code est CELLS (1,1). Si vous souhaitez insérer la valeur dans la cellule B5, le code est CELLS (5,2), c'est-à-dire égal à la cellule B5.

Nous ne pouvons pas insérer de valeurs dans plusieurs cellules à l'aide de la propriété CELLS. Ceci est différent de notre objet RANGE.

Exemple # 3 - Obtenir la valeur de la cellule

Nous avons vu comment insérer des valeurs dans les cellules, nous allons maintenant voir comment obtenir des valeurs à partir des cellules.

Étape 1: définissez une variable comme chaîne.

Code:

Sub Value () Dim K As String End Sub

Étape 2: Pour cette variable «k», nous attribuerons la valeur de la cellule A1. Dans la cellule A1, j'ai entré la valeur «Bienvenue dans VBA».

Le code sera donc k = Range («A1»). Valeur

Code:

Sub Value () Dim K As String K = Range ("A1"). Value End Sub

Étape 3: Affichez le résultat de la variable «k» dans la boîte de message VBA.

Code:

Sub Value () Dim K As String K = Range ("A1"). Value MsgBox K End Sub

En exécutant le code, nous devrions le résultat de la valeur de la cellule A1 dans la boîte de message.

Nous pouvons également utiliser l'objet RANGE pour obtenir les données de la cellule A1. Le code ci-dessous vous montrera la même chose.

Code:

Sub Value () Dim K As String Set CellValue = Range ("A1") MsgBox CellValue End Sub

Cela doit également obtenir la valeur de la cellule A1 dans la boîte de message.

Exemple 4 - Valeur d'erreur si plus d'une valeur de cellule nécessite

Par exemple, regardez le code ci-dessous.

Code:

Sub Value () Dim K As Range Set CellValue = Range ("A1: A5") MsgBox CellValue End Sub

Si vous exécutez le code ci-dessus, nous obtiendrons l'erreur «Type Mismatch».

La raison pour laquelle nous obtenons cette erreur est que lorsque la variable objet est définie sur plus d'une «valeur» de cellule, la propriété ne comprend pas vraiment la valeur de cellule à donner, elle peut donc obtenir une seule valeur de cellule à la fois.