Dans cet article, nous utiliserons l’événement de modification des feuilles de calcul pour afficher un message d’avertissement lorsque le total de la colonne dépasse la valeur totale.

Les données brutes se composent de la composition en sel d’un médicament. Il comprend le nom du sel et son poids par 10 grammes.

ArrowRaw

Le total de tous les ingrédients du sel est égal à 10 grammes. Lorsque nous changeons le poids du sel d’éthane de 0,75 à 1, un message d’avertissement apparaîtra.

ArrowOutput

Explication logique

Dans cet article, nous avons utilisé l’événement de modification de la feuille de calcul pour générer un message d’avertissement. L’événement de modification vérifie le total de 2 ^ nd ^ colonnes, qui ne doit pas dépasser 10.

Explication du code

Si Target.Column = 2 Then Le code ci-dessus est utilisé pour restreindre l’événement de modification au déclenchement uniquement lorsque la valeur de la colonne 2 ^ nd ^ est modifiée.

WorksheetFunction.Sum (Colonnes (2))

Le code ci-dessus est utilisé pour obtenir la somme de toutes les valeurs de la colonne 2.

Veuillez suivre ci-dessous pour le code

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)

'Checking whether value is changed in second column

If Target.Column = 2 Then



'Checking whether sum of values in second column is greater than 10

If WorksheetFunction.Sum(Columns(2)) > 10 Then

MsgBox "Caution, Total has exceeded 10g"

End If

End If

End Sub

Si vous avez aimé ce blog, partagez-le avec vos amis sur Facebook et Facebook.

Nous aimerions avoir de vos nouvelles, faites-nous savoir comment nous pouvons améliorer notre travail et le rendre meilleur pour vous. Écrivez-nous à [email protected]