XL 2010 convertir des formule excel en VBA

[jeanmi]

Bonjour à tous,

je cherche comment convertir des formule excel en mode VBA :

=TEXTE(B4;"mmmm-aa")

=SOUS.TOTAL(9; E3:E5000)

=SOMME(E3:E5000)

Merci d'avance
cordialement

 

[Dranreb]

Bonjour.

SDt = Format(ActiveSheet.[B4].Value, "mmmm-yy")
SsTot = WorksheetFunction.SubTotal(9, ActiveSheet.[E3:E5000])
Somme = WorksheetFunction.Sum(ActiveSheet.[E3:E5000])

 

[Phil69970]

Bonjour @jeanmi

Edit : Bonjour Bernard

Je te propose ce fichier

Merci de ton retour

 

[jeanmi]

Bonjour @jeanmi

Edit : Bonjour Bernard

Je te propose ce fichier

Merci de ton retour

Merci à tous pour ces réponse rapides.
Je vais utiliser la solution de #Phil69970 qui pour moi est plus facile à mettre en œuvre dans mon application.
Cordialement