Lancer une macro dans une formule

  • Initiateur de la discussion Alex
  • Date de début
A

Alex

Guest
Bonjour,

Peut-on lancer une macro à partir d'une formule, par exemple:

si (A1=100;lancer la macro1;lancer la macro2).

Si quelqu'un peut m'aider ?

Je suis novice en Excel ( je sais juste faire une macro, à l'aide du menu 'outils')

Merci d'avance pour votre aide.
Alex
 

_Thierry

XLDnaute Barbatruc
Repose en paix
Bonjour Alex, le Forum

Pas besoin de formule pour ceci, une simple macro évènementielle dans le Private Module de la Feuille en Question :

Soit la cellule 'A1' est modifiée par Saisie (ou par Macro)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = '$A$1' Then
   
If Me.Range('A1') = 100 Then
        MsgBox '100 en A1'
   
Else
        MsgBox 'Pas 100 en A1'
   
End If
End If
End Sub


Soit la cellule 'A1' est modifiée par Formule
Private Sub Worksheet_Calculate()
   
If Me.Range('A1') = 100 Then
        MsgBox '100 en A1'
   
Else
        MsgBox 'Pas 100 en A1'
   
End If
End Sub


A noter que les deux pourraient être mises dans le Private Module de la Feuille au cas où... (Quoique !!!)

Bon Dimanche
@+Thierry


PS afin de t'éviter un autre Post, vu que tu as bien fait de préciser ton niveau, le Private Module de la Feuille est accessible en cliquant sur le Click Droit de ta souris lorsque que tu pointes sur l'onglet de la dîte feuille, et dans le menu contextuel qui va s'ouvrir tu choisis 'Visualiser le Code', un Private Module VBA va automatiquement surgir !!! ... et c'est dans ce module que tu copiera mon code....
 

psycho

XLDnaute Nouveau
Bonjour,

La question d'Alex m'interesse, et la réponse qu'à fait _Thierry ne convient pas dans mon cas.
Existe-t-il donc un moyen de lancer une macro par une formule, plus précisément par la fonction SI comme dans l'expemple d'Alex ?

Je connais assez bien excel, mais quasiment rien en script..
Merci.
 
D

Denis

Guest
Bonjour Alex, Thierry, Psyco et le Forum
Psyco, dans l'exemple de Thierry, il te suffit de remplacer MsgBox ...etc par Macro1 pour lancer la Macro1 et idem pour Macro2 si la condition n'est pas remplie
Bon courage et à +
Denis
 

Discussions similaires

Statistiques des forums

Discussions
312 310
Messages
2 087 122
Membres
103 479
dernier inscrit
Compta