OVH Cloud OVH Cloud

Ajout à un menu (somme, moyenne, min, max etc..)

1 réponse
Avatar
Gaspareau
Bonjour

Voici ma question

Je voudrais savoir si c'Est possible d'ajouter le produit
dans le menu que l'on retrouve en bas de la fenêtre d'Excel.

Je m'explique :

En bas de la fenêtre il y a un endroit où normalement
nous pouvons voir la somme de notre sélection à l'écran.
On peut changer, en cliquant avec le bouton droit, et
avoir le min, le max, la moyenne, compteur, ...

Je voudrais ajouter la fonction produit pour faire en sorte
que si je sélectionne par exemple 4 5 2 6
il m'indique en bas 240 soit 4 x 5 x 2 x 6

C'est possible ??

Merci


--
Gaspareau

Mon adresse de bal via
http://cerbermail.com/?5d2oh98jSk

1 réponse

Avatar
isabelle
bonjour Gaspareau,

j'ai un début de piste, mais je n'arrive pas à faire afficher le
résultat sur la barre "StatusBar", je dit statutbar mais ce n'est
surement pas comme ça que cette fenêtre se nomme.

Sub Macro1()
Dim C As CommandBarControl
With Application.CommandBars(56).Controls
With .Add(msoControlButton)
.Caption = "Produit"
.OnAction = "Macro2"
.BeginGroup = True
.Style = msoButtonCaption
End With
End With
End Sub

Sub Macro2()
MsgBox Evaluate("Product(" & Selection.Address & ")")
End Sub

Sub Macro3()
Application.CommandBars(56).Reset
End Sub

isabelle


Bonjour

Voici ma question

Je voudrais savoir si c'Est possible d'ajouter le produit
dans le menu que l'on retrouve en bas de la fenêtre d'Excel.

Je m'explique :

En bas de la fenêtre il y a un endroit où normalement
nous pouvons voir la somme de notre sélection à l'écran.
On peut changer, en cliquant avec le bouton droit, et
avoir le min, le max, la moyenne, compteur, ...

Je voudrais ajouter la fonction produit pour faire en sorte
que si je sélectionne par exemple 4 5 2 6
il m'indique en bas 240 soit 4 x 5 x 2 x 6

C'est possible ??

Merci

--
Gaspareau

Mon adresse de bal via
http://cerbermail.com/?5d2oh98jSk