Formule ds une macro

  • Initiateur de la discussion Initiateur de la discussion Max
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

Max

Guest
bonjour,
je voudrais effectuer un calcul de variance sur un certain nombre de cellule d'une même colonne (qui varie à chaque utilisation de la macro)

je voulais utiliser cette formule (tiré et modifiée d'après l'enregistreur de commande) mais elle ne fonctionne pas

=> ActiveCell.FormulaR1C1 = "=VARP(cell:R[-1]C)"
=> la reponse est #NOM dans activecell
cell étant la premiere cellule d'où le calcul de variance commence, elle est définie pas de probleme à ce niveau

Comment est-ce que je pourrais cette formule, merci d'avance
 
Salut Max, le Forum


En admettant que tu veuilles calculer de "A1" à "AL" (L = Ligne de l'ActiveCell....)

Sub CalculatesVariance()
Dim L As Integer

L = ActiveCell.Row

ActiveCell.Formula = "=VarP($A$1:A" & L & ")"

End Sub


Bon Appétit

@+Thierry
 
je te remercie de ta réponse @+Thierry
mais je n'ai pas reussi à utiliser la formule
ds mon cas il faudrait quelque chose de plus général pour spécifier la selection

=> est-il possible d'utiliser la formule comme cela varp(cell:cell1)
où cell represente le debut de la selection et cell1 la fin, en sachant que ces 2 cellules sont sur la même colonne
 
Re Max le Forum

Brève visiste vé dodo.... suis mort !

ben ta question est dans ma première réponse, surtout si tu es dans la même colonne...

Sub CalculatesVariance()
Dim Ldep As Integer, Larr As Integer
Ldep = 1 'ou une variable ........... Comme tu veux
Larr = ActiveCell.Row
ActiveCell.Formula = "=VarP("A" & Larr & ":A" & Ldep & ")"
End Sub

Bonne nuit
@+Thierry
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
22
Affichages
3 K
D
  • Question Question
Réponses
3
Affichages
5 K
Retour