Vérifier si une cellule spécifique contient une formule avec Excel VBA

La tâche suivante consiste à utiliser une fonction pour vérifier si une cellule particulière contient une formule ou non. Pour ce faire, insérez la fonction suivante:

Function FormuleCell(r) 
Application.Volatile 
FormuleCell = False 
If Left(r.Formula, 1) = "=" Alors est la formule = True 
End Function

Commentaires:
 Vous pouvez reconnaître une formule ou un lien ou une fonction dans Excel par le fait qu’elle commence par un signe égal. Vous vérifiez exactement ce comportement en évaluant le premier caractère de la cellule cible.
 La cellule B7 contient la formule = SOMME (B5: B6) et est donc clairement une cellule de formule. La fonction rapporte donc la valeur True, qui est convertie en TRUE dans le tableau.
Une autre façon de faire est illustrée dans la macro suivante:

Function FormuleCell(PlageCell As Range) As Boolean 
Application.Volatile 
If PlageCell.HasFormula Then FormuleCell = True 
End Function

Commentaires:
La propriété HasFormula renvoie True si la cellule spécifiée contient une formule, une fonction ou un lien.

S’abonner
Notifier de
0 Commentaires
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x