Raccourci-clavier : Formule sous-total

R@chid

XLDnaute Barbatruc

Supporter XLD

• 26 Janvier 2016

• #2

Re : Raccourci-clavier : Formule sous-total

Bonsoir,
il n'y a pas de raccourci clavier pour des formules ou les fonctions.
Alt+= c'est pour :


@ + +

 

Vote positif 0 Vote négatif

N

Nikless

Guest

• 26 Janvier 2016

• #3

Re : Raccourci-clavier : Formule sous-total

Bonjour R@chid, bonjour à tous,

Peut-on envisager une macro qui se déclencherait avec une combinaison de touches du clavier et qui ferait la somme (avec la fonction sous.total 109) sur la plage continue au-dessus de la cellule active ?

Merci par avance

 

Vote positif 0 Vote négatif

N

Nikless

Guest

• 26 Janvier 2016

• #4

Re : Raccourci-clavier : Formule sous-total

J'ai un début de réponse, que ne donne pas satisfaction.

Code:

Sub test()
    
    LigDeb = ActiveCell.End(xlUp).Row
    LigFin = ActiveCell.Row

    
    ActiveCell.FormulaR1C1 = "=SUBTOTAL(109,R[" & LigDeb & "]C:R[" & LigFin - 1 & "]C)"

End Sub

Sub LancerLeTest()

Application.OnKey Key:="^&", procedure:="test"

End Sub

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

Supporter XLD

• 26 Janvier 2016

• #5

Re : Raccourci-clavier : Formule sous-total

Bonjour,
les experts en VBA vont passer par là pour t’aider.


@ + +

 

Vote positif 0 Vote négatif

N

Nikless

Guest

• 3 Février 2016

• #6

Re : Raccourci-clavier : Formule sous-total

Bonjour le forum,
Le problème semble venir de l'adressage avec la référence R1C1.
Merci de me mettre sur les rails.

Nikless

 

Vote positif 0 Vote négatif