Discussion :

[pekka77]

Bonjour,

J'utilise occasionnellement Excel et j'utilise souvent les formules par exemple pour afficher la date d'aujourd'hui ou pour effectuer une somme ou aussi pour calculer un age à partir d'une date de naissance.

Cependant, j'ai besoin de réaliser un calcul qui n'est pas possible avec les formules proposées. Il s'agit d'afficher dans une cellule le nombre de cellules d'une certaine couleur dans une colonne.

Pour faire cela je dois utiliser une macro je pense mais j'ai l'impression que les macros peuvent être appelés seulement à l'aide du menu macro ou par l'intermédiaire d'un bouton. Moi je voudrais que le résultat soit tout le temps à jour. Peut-être peut-on appeler la macro dans la barre de formule mais je ne sais pas comment.

Pouvez-vous m'éclairer ?

Merci beaucoup

[tomy7]

tu as le choix entre actionner ta macro avec le menu excel, avec un bouton, a l ouverture a, la fermeture , et je pense le plus important pour toi des que ta feuille change ...

Edit :

Soit plus precis au niveau de ton besoin...

[fring]

Bonjour,

Plusieurs possibilités de lancer une macro lors d'un évènement, notamment :

• on exécute la macro à l'ouverture du classeur
  code à placer dans l'objet ThisWorkbook

Code :

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

1
2
3
Private Sub Workbook_Open()
Nom_de_la_Macro
End Sub

• lors d'une modification sur la feuille
  code à placer dans l'objet feuille

Code :

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

1
2
3
Private Sub Worksheet_Change(ByVal Target As Range)
Nom_de_la_Macro
End Sub

• lors d'une modification sur la feuille mais uniquement dans la colonne F
  code à placer dans l'objet feuille

Code :

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

1
2
3
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 6 Then Nom_de_la_Macro
End Sub

[pekka77]

• lors d'une modification sur la feuille mais uniquement dans la colonne F
  code à placer dans l'objet feuille

Code :

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

1
2
3
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 6 Then Nom_de_la_Macro
End Sub

Merci beaucoup, c'est exactement ce que je voulais savoir !
Pouvez-vous aussi me dire ou je peux trouver une doc sur le VBA Excel listant toutes les objets et méthodes associées ?

[tomy7]

http://vb.developpez.com/cours/ici je pense

[pekka77]

J'ai remarqué qu'en placant la macro ici :

Code :

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

1
2
3
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 6 Then Nom_de_la_Macro
End Sub

la macro n'est executée que si on change la valeur d'une cellule de la colonne. Si on change sa couleur par exemple, la macro n'est pas exécuté. Peut-on executer la macro même après un changement de couleur ?

[Gorfael]

Salut pekka77 et le forum
À ma connaissance, non.
Les changement de format ne créent aucun évènement associable à une macro. Changement de police, couleur, encadrement... ne génèrent rien d'exploitable.
A+