Activation automatique de macro

[Seb]

Comment faire pour activer une macro dès qu'une cellule est remplie. Dès qu'il y a une quelconque information dans la cellule, j'aimerais activer une macro...

Merci pour votre aide

 

[CBernardT]

Bonjour Seb,

Il te faut créer une macro évènementielle. L'événement se produit lorsque les cellules de la feuille de calcul sont modifiées par l'utilisateur ou par un lien externe.

La macro suivante lance la macro Coloration quand la cellule D1 de la feuille est modifiée.
Cette macro est à placer dans le module de la feuille concerné.

Le code qui effectuera la coloration peut être indifféremment placer dans cette macro ou à part dans une macro placée dans un module standard, comme dans l'exemple.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range('D1')) Is Nothing Then
Coloration
End If
End Sub

Cordialement

Bernard

 

[Seb]

Merci infiniement pour ton conseil et ton aide... ce site est vraiment génial... c la première fois que j'y vais ...

Merci encore... et j'espère que ca va marcher car je commencais à désespérer.

A+

 

[Seb]

Je suis désolé mais ca ne marche (parce que je ne sais pas le faire marcher)

Voila ce que j'ai fait:
Je veux que lorsque l'on met quelque chose dans la case O6 le user form2 doit apparaitre.


Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range('O6')) Is Nothing Then
UserForm2.Show
End If
End Sub

Est-ce que tu pourrais encore m'aider une fois.

Merci

 

[titcoeur]

Salut

Je m'intéressait au sujet et
J'ai tapé ce code, et chez moi ça marche bien.

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

If Not Application.Intersect(Target, Range('O6')) Is Nothing Then
UserForm1.Show
End If

End Sub

Qu'est -ce que ça donne chez toi ?

le simple userform.show, sans condition, marche-t-il ?

 

[CBernardT]

Re Seb,

Ta syntaxe me paraît parfaite donc il y a autre chose qui ne vas pas ??

Es-tu bien sûr de la cellule O6 ??
Est-ce le userform2 à ouvrir ?
Existe-t-il ?

à voir 🙁 🙁

Cordialement

Bernard