Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Fonction SI lancement de macro

  • Initiateur de la discussion Initiateur de la discussion Maxime02
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

Maxime02

Guest
Bonjour,

J'ai vagabonder de site en site mais impossible sur tout les topics de trouver la solution ou quand solution il y a et que je test cela ne marche pas.
Je reviens donc vers vous avec cette humble question à laquelle, s'il vous plait, je vous demande d'apporter réponse.

Donc voila j'ai un Test logique : =SI(J1=1;mafonction();"x")

J'ai créé une fonction pour que mon test logique lance la fonction qui elle lance la macro :

Fonction :


Public Function mafonction() (J'ai éssayer Public function ; Function ; Private Sub ; Private function)

If Range("J1") = 1 Then Call Macro2

End Function

La macro :

Range("K1") = "Sa marche"

La macro est bien sur bien plus complexe mais inutile à mettre le principe restera le même.


Donc voila j'ai toujours un méssage dans ma case : #NOM ou #VALEUR ou encore 0

Comment faire pour que cela marche, c'est à dire que ma fonction SI lance une macro si ma cellule est égale à 1.

Merci d'avance pour vos réponses.
 
Re : Fonction SI lancement de macro

Je n'arrive pas a ouvrir le fichier de mutzik , surement car c'est un fichier 2007.

Merci pierrejean j'arrive à faire apparaitre un msgbox mais pas à modifier une cellule :

mafonction = "J1 <> 1"
Application.Volatile
If cellule = 1 Then
Cells(1, 11) = 2 (j'ai essayé avec Range("K1")=2 mais marche pas non plus.

Car en faite j'ai une macro beaucoup plus complexe a faire venir juste aprés : If cellule = 1 Then.
Une macro ou je dois copier des photos puis les enregistré etc....
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…