Slt, j'ai écrit une macro pour faire la moyenne des valeurs entre 2 colonnes. J'ai un tableau de 256 lignes et la boucles s'arrête à la ligne 252 puis me lance une erreur 1004 erreur sur l'objet.
Voila le script :
Sub moyenne()
Dim i As Integer
Dim j As Integer
Dim k As Integer
Dim l As Integer
Dim m As Integer
j = 1
m = 2
i = UsedRange.Columns.Count
Cells(1, i + 1) = "Average"
Do
Do
If Cells(1, j).Value = "High" Then
k = Cells(1, j).Column
ElseIf Cells(1, j).Value = "Low" Then
l = Cells(1, j).Column
End If
j = j + 1
Loop Until IsEmpty(Cells(1, j).Value)
Cells(m, i + 1) = Cells(m, k) / 2 + Cells(m, l) / 2
m = m + 1
Loop Until IsEmpty(Cells(m, 1).Value)
End Sub
L'erreur se situe dans une des 2 lignes en gras
Si quelqu'un a une idée d'amélioration...merci d'avance