Comment utiliser Wrapper Functions dans Excel 2016 VBA - mannequins

Ici, vous trouverez quelques fonctions de feuille de calcul Excel VBA relativement simples et très utiles. Ces fonctions sont appelées fonctions d'encapsulation car elles sont constituées de code enveloppé autour d'éléments VBA intrinsèques. En d'autres termes, ils vous permettent d'utiliser les fonctions VBA dans les formules de feuille de calcul.

Fonction Utilisateur () 'Renvoie le nom de l'utilisateur actuel Utilisateur = Application. UserName End Function

Cette fonction, en substance, permet à vos formules d'accéder à la propriété UserName de l'objet Application.

La fonction NumberFormat

Cette fonction affiche simplement le format numérique d'une cellule. Cela peut être utile si vous devez vous assurer qu'un groupe de cellules a le même format numérique.

Function NumberFormat (Cell) 'Renvoie le format numérique de la cellule NumberFormat = Cell (1). NumberFormat End Function

Notez l'utilisation de Cell (1)? Si une plage multicellulaire est utilisée comme argument, seule la première cellule est utilisée.

Vous pouvez facilement écrire des fonctions similaires qui renvoient la couleur du texte, la couleur d'arrière-plan, la police d'une cellule, etc.

La fonction ExtractElement

Cette fonction wrapper renvoie une sous-chaîne à partir d'une chaîne de texte contenant plusieurs éléments, séparés par un caractère séparateur. Par exemple, cette formule renvoie cow, qui est le troisième élément d'une chaîne qui utilise un espace comme séparateur. Les arguments, bien sûr, pourraient être des références de cellules.

= ExtractElement ("dog horse cow cat", 3, "")

Voici le code, qui est un wrapper pour la fonction Split de VBA:

Fonction ExtractElement (Txt, n, Sep) 'Renvoie le nième élément d'une chaîne de texte, où les éléments sont séparés par un caractère de séparation spécifié ExtractElement = Split (Application.Tim (Txt), Sep) (n - 1) Fin Fonction

L'image ci-dessous montre la fonction ExtractElement utilisée dans les formules de feuille de calcul. La colonne A contient la chaîne de texte, la colonne B contient le numéro d'élément à extraire et la colonne C contient le délimiteur (les cellules qui semblent vides contiennent un caractère espace).

Utilisation de la fonction ExtractElement pour renvoyer un élément d'une chaîne.

La fonction SayIt

Cette fonction simple est un wrapper pour la méthode Speak de l'Application. Objet de la parole. Il utilise une voix synthétisée pour "parler" l'argument.

Fonction SayIt (txt) 'Prononce l'argument Application. Discours. Speak txt, Fonction True End

Voici un exemple:

= IF (C10> 10000, SayIt ("Over budget"), "OK")

La formule vérifie la cellule C10. Si la valeur est supérieure à 10 000, la fonction parle le texte: "Over budget"."Si la valeur est inférieure à 10 000, la fonction affiche le texte OK (et ne dit rien).

Utilisez avec parcimonie. Si vous utilisez cette fonction plus d'une fois, cela peut être très déroutant. De plus, n'oubliez pas que cette fonction est évaluée à chaque fois que la feuille de calcul est calculée, de sorte que la voix peut devenir très ennuyeuse si vous effectuez de nombreux changements. Cette fonction est probablement plus adaptée à des fins de divertissement.

La fonction IsLike

L'opérateur Like de VBA est un moyen très flexible de comparer des chaînes de texte. Vérifiez-le dans le système d'aide VBA. Cette fonction apporte cette puissance à vos formules de feuille de calcul:

Fonction IsLike (text, pattern) 'Renvoie true si le premier argument est comme le second IsLike = text Comme pattern End Function