Faire une macro avec une fonction

Résolu/Fermé

Fleci - 4 oct. 2017 à 11:42
jordane45 Messages postés 38418 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 14 février 2025 - 4 oct. 2017 à 14:06

Bonjour,

je voudrai créer un bouton affecté à une macro qui ferrai fonctionner la fonction suivante:
Function couleur(Cellule As Range)
.Application.Volatile
couleur = Cellule.Interior.ColorIndex
End Function

et je ne trouve pas comment faire.....

A voir également:

Faire une macro avec une fonction
Fonction si et - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Macro word - Guide
Fonction moyenne excel - Guide
Jitbit macro recorder - Télécharger - Confidentialité

2 réponses

Réponse 1 / 2

jordane45 Messages postés 38418 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 14 février 2025 4 734
4 oct. 2017 à 12:48

Bonjour,

Tu fais une SUB (que tu appelleras depuis ton bouton)
cette sub contiendra le code suivant

Sub lenomquetuveux()
 Dim res
 Dim Cellule As Range

 set Cellule = ActiveCell
 res = couleur(Cellule) 
MsgBox res
End Sub

Réponse 2 / 2

Fleci
4 oct. 2017 à 13:18

Merci bcp, mais j'ai ça maintenant.

Sub couleur()
Dim res
Dim Cellule As Range

Set Cellule = ActiveCell
res = couleur(Cellule)
MsgBox res
End Sub

et un message:

Erreur de compilation:

Nom ambigu détecté: couleur

jordane45 Messages postés 38418 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 14 février 2025 4 734
4 oct. 2017 à 13:49

Heu... la sub ne peut pas avoir le meme nom que ta fonction

Fleci > jordane45 Messages postés 38418 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 14 février 2025
4 oct. 2017 à 13:54

à la demande de mon Chef, je me lance dans l'apprentissage...Sorry ;-)

merci Bcp

jordane45 Messages postés 38418 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 14 février 2025 4 734 > Fleci
4 oct. 2017 à 14:06

Si c'est résolu .. n'oublie pas de cliquer sur le lien sous le titre de ta question

Discussions similaires

Remplir une cellule (texte) en fonction d'une autre (texte).

Décalage de formule

Excel : colorer une cellule sous condition d'une autre ?

[Excel 2010] Remplir cellule d'après contenu d'une autre

Formule permettant de remplir automatiquement un tableau excel