Répondre à la discussion
Affichage des résultats 1 à 6 sur 6

moyenne sous excel via VBA/macro/bouton



  1. #1
    rougesang

    moyenne sous excel via VBA/macro/bouton


    ------

    Bonjour,
    étant un réel novice sous excel, je poste une question qui vous semblera certainement très co... mais bon on est comme on nait ^^
    Voilà, je souhaite faire une macro sous excel qui me permette de calculer une moyenne toute bête du type m = somme / x avec x = nombre d'échantillons.
    Je sais le faire dans la feuille de calcul, mais j'aimerai que cela ce fasse sous VBA et qu'à l'affichage il n'y ai qu'à cliquer sur un boutton ActiveX pour effectuer ce calcul.
    J'ai pas mal cherché sur google, yahoo et autres alors j'espère que quelqu'un aura une réponse.
    J'espère être au bon endroit et que mes fautes d'orthographes ne gêneront pas trop.
    Merci.

    -----

  2. Publicité
  3. #2
    jiherve

    Re : moyenne sous excel via VBA/macro/bouton

    Bonsoir,
    ici VBA pour les nuls http://dj.joss.free.fr/.
    pas de méprises je suis aussi passé par là.
    JR
    l'électronique c'est pas du vaudou!

  4. #3
    rougesang

    Re : moyenne sous excel via VBA/macro/bouton

    Merci pour le rien mais je doit vraiment être un cas lol

    J'ai testé ça mais ça ne marche pas :'(

    Code:
    Sub CommandButton1_Click()
    Dim m, s, C1, C2, C3, C4, C5 As Integer
    s = C1 + C2 + C3 + C4 + C5 = ActiveSheet.Cells(10, 2).Value
    m = s / 5 = ActiveSheet.Cells(9, 2).Value
    C1 = ActiveSheet.Cells(2, 2)
    C2 = ActiveSheet.Cells(3, 2)
    C3 = ActiveSheet.Cells(4, 2)
    C4 = ActiveSheet.Cells(5, 2)
    C5 = ActiveSheet.Cells(6, 2)
    End Sub
    Quelqu'un aurait une idée?
    Dernière modification par yoda1234 ; 27/10/2009 à 18h28. Motif: Ajout balise code

  5. #4
    sitalgo

    Re : moyenne sous excel via VBA/macro/bouton

    B'jour,

    Les instructions sont exécutées dans l'ordre, de haut en bas.
    Code:
    Sub CommandButton1_Click()
    Dim m, s, C1, C2, C3, C4, C5 As Integer
    s = C1 + C2 + C3 + C4 + C5 = ActiveSheet.Cells(10, 2).Value
    m = s / 5 = ActiveSheet.Cells(9, 2).Value
    C1 = ActiveSheet.Cells(2, 2)
    C2 = ActiveSheet.Cells(3, 2)
    C3 = ActiveSheet.Cells(4, 2)
    C4 = ActiveSheet.Cells(5, 2)
    C5 = ActiveSheet.Cells(6, 2)
    End Sub
    On ne peut pas faire la somme alors que les valeurs ne sont pas encore lues.
    Il faut aussi respecter la syntaxe
    Code:
    Sub CommandButton1_Click()
    Dim m, s, C1, C2, C3, C4, C5 As Integer
    C1 = ActiveSheet.Cells(2, 2)
    C2 = ActiveSheet.Cells(3, 2)
    C3 = ActiveSheet.Cells(4, 2)
    C4 = ActiveSheet.Cells(5, 2)
    C5 = ActiveSheet.Cells(6, 2)
    s = C1 + C2 + C3 + C4 + C5
    ActiveSheet.Cells(10, 2).Value = s
    m = s / 5
    ActiveSheet.Cells(9, 2).Value = m
    End Sub

    Quelqu'un aurait une idée?[/QUOTE]
    Mais si t'as l'gosier, Qu'une armure d'acier, Matelasse. Brassens, Le bistrot.

  6. A voir en vidéo sur Futura
  7. #5
    sitalgo

    Re : moyenne sous excel via VBA/macro/bouton

    D'autre part les instructions suivantes
    Code:
    Dim m, s, C1, C2, C3, C4, C5 As Integer
    déclarent seulement C5 en entier, les autres sont var (par défaut).
    on peut écrire plus simplement
    Code:
    Dim m&, s&, C1&, C2&, C3&, C4&, C5&
    & pour entier 4 octets ; # pour flottant long. Voir le manuel.
    Mais si t'as l'gosier, Qu'une armure d'acier, Matelasse. Brassens, Le bistrot.

  8. #6
    rougesang

    Re : moyenne sous excel via VBA/macro/bouton

    Merci pour ta réponse c'est exactement ce qu'il me fallait, une vrai remise en forme de ce que je tapai ^^
    Merci

  9. Publicité

Discussions similaires

  1. Macro Excel : Calcul d'une moyenne
    Par lolo66000 dans le forum Logiciel - Software - Open Source
    Réponses: 5
    Dernier message: 19/08/2009, 08h51
  2. Macro vba et solveur excel : problème
    Par peyo54 dans le forum Logiciel - Software - Open Source
    Réponses: 1
    Dernier message: 26/03/2009, 16h25
  3. programmation vba sous excel
    Par Nono les gazzz dans le forum Logiciel - Software - Open Source
    Réponses: 19
    Dernier message: 26/02/2009, 16h23
  4. M'aider à créer une petite macro sous word ou excel
    Par azeto dans le forum Logiciel - Software - Open Source
    Réponses: 29
    Dernier message: 16/04/2007, 12h12
  5. VBA Excel: appliquer une macro a plusieurs fichiers
    Par Igothigh dans le forum Logiciel - Software - Open Source
    Réponses: 2
    Dernier message: 14/03/2007, 09h45
Découvrez nos comparatifs produits sur l'informatique et les technologies.