Moyenne en VBA

Résolu/Fermé

jahawai Messages postés 223 Date d'inscription dimanche 23 décembre 2007 Statut Membre Dernière intervention 12 mai 2020 - 17 mai 2010 à 10:54
jahawai Messages postés 223 Date d'inscription dimanche 23 décembre 2007 Statut Membre Dernière intervention 12 mai 2020 - 17 mai 2010 à 14:39

Bonjour,

Je cherche à faire une moyenne de plusieurs valeurs d'une ligne.
Voici mon code, qui ne fonctionne pas. Quelqu'un peut-il me dire pourquoi ?

Merci d'avance

Sub Bouton18_QuandClic()

Dim dercol5 As Byte
Dim derline5 As Byte
dercol5 = Range("B4").End(xlToRight).Column
derline5 = Range("B4").End(xlDown).Row

Dim b As Byte
For b = 6 To dercol5 - 1
Cells(4, dercol5).Value = "=AVERAGE(Cells(4, 6).Value, Cells(4, dercol5 - 1).Value)"
Next


End Sub

A voir également:

Moyenne en VBA
Formule moyenne excel - Guide
Incompatibilité de type vba ✓ - Forum Programmation
Vba attendre 1 seconde ✓ - Forum VB / VBA
Vba dernière colonne non vide ✓ - Forum VB / VBA
Vba récupérer valeur cellule ✓ - Forum VB / VBA

2 réponses

Réponse 1 / 2

jahawai Messages postés 223 Date d'inscription dimanche 23 décembre 2007 Statut Membre Dernière intervention 12 mai 2020 11
17 mai 2010 à 12:34

Petite précision,

Je cherche donc sur une ligne à afficher dans la dernière colonne du tableau, la moyenne des colonnes précédentes (depuis la 4ème).

Personne ?

Réponse 2 / 2

jahawai Messages postés 223 Date d'inscription dimanche 23 décembre 2007 Statut Membre Dernière intervention 12 mai 2020 11
17 mai 2010 à 14:39

Pas de réponse, donc j'en donne une, ça peut peu-être aider des gens :

Il manquait Application devant Average;

Voilà, sujet résolu ;-)

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

VBA : Range avec références variables..

VBA erreur 1004

ouverture d'un fichier excel à partir d'un code VBA

Méthode find dans VBA - Recherche de données sous Excel

Discussions similaires

Newsletters