Signaler

Faire une macro avec une fonction [Résolu]

Posez votre question Fleci - Dernière réponse le 4 oct. 2017 à 14:06 par jordane45
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.....
Utile
+0
plus moins
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



Donnez votre avis
Utile
+0
plus moins
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 18393Messages postés mercredi 22 octobre 2003Date d'inscription ModérateurStatut 10 octobre 2017 Dernière intervention - 4 oct. 2017 à 13:49
Heu... la sub ne peut pas avoir le meme nom que ta fonction
Répondre
Fleci- 4 oct. 2017 à 13:54
à la demande de mon Chef, je me lance dans l'apprentissage...Sorry ;-)

merci Bcp
Répondre
jordane45 18393Messages postés mercredi 22 octobre 2003Date d'inscription ModérateurStatut 10 octobre 2017 Dernière intervention - 4 oct. 2017 à 14:06
Si c'est résolu .. n'oublie pas de cliquer sur le lien sous le titre de ta question
Répondre
Donnez votre avis

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !