Installation de fonction dans votre classeur


Débuter par ouvrir la fenêtre de Microsoft Visual Basic, dans le menu de Excel cliquer sur Visual Basic .
Si vous l'avez pas, faite un clic droit dans la barre des menus, dans la liste déroulante ,cocher l'icone Visual Basic.
Vous aurez le menu Visual Basic, ouvrir la fenêtre Microsoft Visual Basic.
A gauche vous avez la petite fenêtre Projet-VBAProject , si elle est pas afficher, dans le menu Affichage / Code.
Dérouler le classeur Microsoft Excel Objets en cliquant sur le petit plus devant le dossier, la vous avez Feuil1, Feuil2, Feuil3, et ThisWorkbook.
Pour avoir le dossier Modules et Module1
Cliquez dans le menu Visual Basic sur enregistré une macro , ici le deuxième bouton.
Une autre fenêtre s'ouvre, vous demmendant , un nom pour la macro, la date et l'auteur
le classeur, la touche de raccourci.
Faite OK .
Vous avez une petite fenêtre dans Excel.
Sélectionnez une cellule quelconque et cliquez sur Arrêt de la petite fenêtre.
Revenez dans la fenêtre de Microsoft Visual Basic , regarder la fenêtre de gauche Projet-VBA Project , vous avez le dossier Modules et Module1.
Cliquez deux fois dessus, la fenêtre Classeur1 xls-Module1. (Code) s'ouvre.
Elle est rempli par Sub Macro() ect....
Vous éffacer tout. Et recopier la fonction si après en respectant les lignes et intervalles avec un copier/coller.
Function CoulJaune(r As Range) As Long
Dim s As Range
For Each s In r
If s.Interior.ColorIndex = 6 Then CoulJaune = CoulJaune + 1
Next s
End Function
Maintenant vous avez le résultat à l'image 1 en haut de la page.
Revenez à Excel, colorier des cellules au choix, mais quelqu'une en jaune.
Dans la barre des formules écrivez =CoulJaune(A1:D5).
Si la barre des formules est pas afficher, cocher la dans Options / Affichage / Barre formule.
CoulJaune est le nom donner à la fonction, on peut très bien en changer dans la fonction.
Entre parenthèses mettez les cellules à compter, les deux points ":" veut dire de la cellule A1 jusque D5.
Point virgule ";" veut dire chaque cellule noter séparément .
Appuyer la touche Entrée , le résultat s'affiche dans la cellule sélectionnée avec la formule.
Ou vous pouvez cliquez sur l'icone à coté de la formule dans la barre "fx", la fenêtre Argument de la fonction s'ouvre.
La vous pouvez noter les cellules consernées, voir le résultat.

 

 

 

Retour liens Excel