Bonjour,
je suis actuellement bloqué avec une "simple" définition d'une variable range (en fait quelques cellules d'une colonne) que je souhaite par la suite utiliser pour le calcul d'une moyenne.
J'ai en fait 2 feuilles:
- l'une contient les valeurs brutes (feuille_origine)
- l'autre contiendra le résultat du calcul
Dans le code ci-dessous, j'ai testé avec une entrée "manuel" de la plage (A3:A20) et cela fonctionne. Par contre impossible de rentrer la plage en utilisant la propriété "Cells". Je pense faire une erreur avec l'utilisation de cette propriété mais ....?
Voici le code actuel :
Merci d'avance pour votre aide.
je suis actuellement bloqué avec une "simple" définition d'une variable range (en fait quelques cellules d'une colonne) que je souhaite par la suite utiliser pour le calcul d'une moyenne.
J'ai en fait 2 feuilles:
- l'une contient les valeurs brutes (feuille_origine)
- l'autre contiendra le résultat du calcul
Dans le code ci-dessous, j'ai testé avec une entrée "manuel" de la plage (A3:A20) et cela fonctionne. Par contre impossible de rentrer la plage en utilisant la propriété "Cells". Je pense faire une erreur avec l'utilisation de cette propriété mais ....?
Voici le code actuel :
With mafeuille_destination.Range("A1")
For i = 0 To colonne_max 'parcours des colonnes
.Offset(0, i) = mafeuille_origine.Range("A1").Offset(0, i)
.Offset(1, i) = mafeuille_origine.Range("A1").Offset(1, i)
For j = N + 2 To 100 'parcours des lignes
Set plage = mafeuille_origine.Range("A3:A20") '<--- ca fonctionne
Set plage = .Range(.Cells(3, 0), .Cells(20, 0)) '<---- pas ça erreur 1004
moyenne = WorksheetFunction.Average(plage)
.Offset(j - N, i).Value = moyenne
Next
Merci d'avance pour votre aide.