Faire une moyenne de deux colonnes dans une autres
Résolu
scuti
Messages postés
31
Statut
Membre
-
scuti Messages postés 31 Statut Membre -
scuti Messages postés 31 Statut Membre -
Bonjour,
Mettons que j'ai 2 colonnes A et B, A et B contiennent des nombres.
Je voudrais une macro qui crée un colonne (C) faisant la moyenne de A et de B pour chaque ligne.
C2 = ( A2 + B2 ) /2
C3 = ( A3 + B3 ) /2
C4 = ( A4 + B4 ) /2
....
Et ce jusqu’à ce que il n'y ai plus de valeur dans les colonnes A et B qui peuvent varier de longueur . (longueur pouvant aller dans les 365 000)
Merci d'avance
Mettons que j'ai 2 colonnes A et B, A et B contiennent des nombres.
Je voudrais une macro qui crée un colonne (C) faisant la moyenne de A et de B pour chaque ligne.
C2 = ( A2 + B2 ) /2
C3 = ( A3 + B3 ) /2
C4 = ( A4 + B4 ) /2
....
Et ce jusqu’à ce que il n'y ai plus de valeur dans les colonnes A et B qui peuvent varier de longueur . (longueur pouvant aller dans les 365 000)
Merci d'avance
5 réponses
-
Bonjour Scuti
Essayer ceci
=MOYENNE(A2:B2)
-
Dim derLig As Long
derLig = Sheets("paramètres").Range("A" & Sheets("paramètres").Rows.Count).End(xlUp).Row
Range("AN1").Select
ActiveCell.FormulaR1C1 = "Profondeur moyenne tête"
Range("AN2").Select
ActiveCell.FormulaR1C1 = "=(RC[-10]+RC[-9])/2"
Range("AN2").Select
Selection.AutoFill Destination:=Range("AN2:AN" & derLig), Type:=xlFillDefault -
Y'a deux trois bricoles a regler mais voila la base :
Sub AutoAverage() Dim LRow As Integer LRow = Range("B1").End(xlDown).Row Range("C1").Formula = "=AVERAGE(A1:B1)" Range("C1:C" & LRow).FillDown End Sub
L'astuce provient du "FillDown" et du "LRow"
Source :
https://stackoverflow.com/questions/22104743/excel-vba-autofill-multiple-cells-with-formulas
-
et merci de signaler quand tu postes également dans un autre forum : https://www.developpez.net/forums/d1723096/logiciels/microsoft-office/excel/macros-vba-excel/faire-moyenne-colonnes-autres/
Surtout si tu as la réponse et qu'il inutile de continuer.
-
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -