Comment examiner des cellules avec une macro
Souhaitez-vous évaluer les cellules et déterminer combien de cellules sont remplies dans une plage et combien ne le sont pas ? La figure suivante montre un exemple :
Le marqueur A1 : B7 contient des cellules vides et des cellules remplies. Si vous souhaitez évaluer cela dans une macro, vous pouvez utiliser le code de programme suivant :
Sous-comptesFilledCells ()
Dim Nombre aussi long
Dim Number2 aussi long
Zone obscurcie As Range
Dim a As String
Zone définie = Sélection
Nombre = Application.CountA (zone)
Count2 = area.Cells.Count - nombre
a = MsgBox ("Dans la sélection actuelle se trouvent" _
& Nombre & "cellules remplies et" & nombre2 _
& "Cellules vides.", VbOKOnly, "évaluer les cellules")
Fin du sous-marin
La macro définit la fonction CompteA pour compter le nombre de cellules non vides dans une plage. Le résultat enregistre la variable numéro. Pour déterminer le nombre de cellules remplies, cette valeur est soustraite du nombre total de cellules examinées. La macro enregistre cette valeur dans Numéro 2.
Après le démarrage, le code du programme détermine le nombre de cases remplies et vides dans le marquage actif et affiche le résultat dans une fenêtre :
Si vous souhaitez traiter une plage de votre choix plutôt que la sélection en cours, adaptez la valorisation à la variable Région à. Il est utilisé dans la macro avec la propriété Sélection connecté. Si vous souhaitez définir vous-même une plage à la place, remplacez le ensemble-Affectation à la variable Région par une expression de la forme suivante :
Plage définie = Plage ("A1 : B5")
La spécification de plage fait toujours référence à la feuille de calcul active. Si vous souhaitez aborder une autre feuille de calcul, placez-la devant le VarierCommande les références aux méthodes Cahiers d'exercices et Des draps fixé.
