Calcul

Résolu
Bonjour,
à l'aide d'un petit prog vbe sous excel ; quand je saisie des valeurs dans une plage 2;7;8 pour exemple je trouve les valeurs :6;14;16 et cela par une multiplication de la plage par un nbre et merci

3 réponses

  1. Contributeur
    Bonjour,

    Simple question : pourquoi vouloir un code VBA alors qu'un simple "copier / coller avec multiplication" suffit ?

    Cdlt,
    1. Modérateur
      Bonjour,
      Effectivement pas très clair...
      Je dirais :
      Sub FoisDeux()
      Dim Plage As Range, Cel As Range
      Dim Coeff As Byte
      
      Coeff = 2
      Set Plage = Range("A1:A3")
      For Each Cel In Plage
          Cel.Value = Cel.Value * Coeff
      Next
      Set Plage = Nothing
      End Sub
      --
      Cordialement,
      Franck P
      1. c'est quoi la question?
        faites un effort
        1. je veut calculer la moyenne d'une classe dont leur composition et noté sur 20 mais elle est porté sur 60 dans le bulletin ma question est simple :saisir dans excel les notes dans une plage(A1:A33)... sur 20 et a l'aide de vbe et dans la meme plage (A1:A33) je veut avoir les notes sur 60 et merci
        2. Je n'ai toujours rien compris