Discussion :

[Jah78]

Bonjour,

Question generale: Je cherche a faire tourner une macro automatiquement apres le changement d'une cellule.

Peut on utiliser Afterupdate sous Excel comme je l'utilise sous Access ?
Faut-il nommer la cellule (par exemple: toto), puis faire

sub toto_Afterupdate () ou qqchose comme ca ?

Ensuite, pour executer la macro automatiquement, existe t il Docmd.runmacro ?

Sinon, quelqu'un pourrait il m'eclairer ?

Merci a tous

Jah

[SfJ5Rpw8]

c'est pas tout à fait cela .. pour les cellules d'une feuilles excel tu peu utiliser le code associé à la feuille et les fonctions événementielle

dans l'éditeur de code VBE, un double clic sur la feuille concerné dans l'arborescence de gauche puis :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub Worksheet_Change(ByVal Target As Range)
 MsgBox "Modification de la cellule " & Target.Address
End Sub

tiens en supplément un peu de lecture

Cours : Programmer efficacement avec Excel en VBA (pdf, 46 pages, 711 Ko) par J-M Rabilloud

[Jah78]

ok, j'ai mis le code, mais comment le code sait que c'est qd on change la cellule "A1" (par exemple), qu'il doit afficher le message ?

[SfJ5Rpw8]

ok, j'ai mis le code, mais comment le code sait que c'est qd on change la cellule "A1" (par exemple), qu'il doit afficher le message ?

ben tu as essayé de changer une valeur de cellule voir ce que le code affiche dans message box ..?

[Jah78]

Oui, j'ai essayé, mais il n'y a rien qui se passe...

Mais pour Worksheet_Change, dois je remplacer Worksheet par le nom de ma sheet ?

[Jah78]

ok, excuses moi, je n'avais pas placer la function sur ma feuille mais dans un module. Maintenant, le message s'affiche bien, merci

Par contre, comment faire pour que ce message ne s'affiche que pour le changement d'une cellule précise (par exemple A1) ?

[SfJ5Rpw8]

Oui, j'ai essayé, mais il n'y a rien qui se passe...

Mais pour Worksheet_Change, dois je remplacer Worksheet par le nom de ma sheet ?

non tu n'as même pas à le saisir si tu te trouve au bon endoit.. dans l'éditeur VBE... , dans l'arborescence de gauche tu clique avec le bouton droit sur la feuille concernée, puis tu sélectionne code dans menu .. ensuite dans les 2 combobox au dessus de la zone de saisie du code à gauche tu sélectionne Worksheet et à droite tu sélectionne Change ...

[Jah78]

cool, merci.

• Comment doit je faire pour que ca réagisse seulement à un changement d'une seule cellule donnée ?

• De plus, comment puis je lancer une macro automatiquement sur cet évenement, je n'ai pas l'impression qu'il y ai Runmacro...?

a+

[SfJ5Rpw8]

ben au lieu d'afficher l'adresse de la cellule modifié tu effectue un test histoire de voir si c'est la bonne cellule

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = Range("A1").Address Then
    maProcedure
  End If
End Sub

ainsi sur changement d'état dans cellule A1, il y as appel de la procédure MaProcedure..
qui peu être défini dans un module ..

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Sub maProcedure()
  MsgBox "MaProcedure"
End Sub

[Jah78]

merci beaucoup, c'est exactement ce que je voulais!

je comprends mieux comment vba marche avec Excel!

a+