comment appeler une macro ds une formule

[michel]

Salut à tous,

Je souhaiterai appeler ou exécuter une macro si une condition est vrai, dans une formule.
Est ce possible?, et comment?
D'avance merci.

 

[JB]

- Bonjour ou bonsoir michel,

voici une petite macro qui lance la seconde macro si "VRAI" apparaît dans la cellule A1 de la Feuil1.
La seconde macro (pour l'exemple) insère la date du jour dans la cellule B1.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Sheets("Feuil1").Range("A1") = "VRAI" Then
METLADATE
End If
End Sub

Private Sub METLADATE()
Sheets("Feuil1").Range("B1") = Date
End Sub

J'espère que c'est ce que tu cherchais.
A+ JB

 

[Roland]

Bonsoir Michel et JB

Je crois que le plus simple et d'utliser les fonctions personnelles presque bien documentées dans l'aide VBA.

Les grandes lignes tu crées ton code dans un module

Function toto ( a as integer, b as string) as long
ton code
End Function


dans ta cellule

=si (condition;toto()

A+ Roland