IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Problème VBA Range(A4: "A"&i)


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Février 2012
    Messages
    11
    Détails du profil
    Informations forums :
    Inscription : Février 2012
    Messages : 11
    Par défaut Problème VBA Range(A4: "A"&i)
    Bonjour à tous

    Je veux calculer la moyenne des cellules partant de H4 , jusqu'à un certain H (le i-eme) avec i la dernière case non vide de la colonne H
    Dans mon exemple i vaut 126 (comme i peut varier je ne peux pas mettre H4:H126)

    Voila ce que j'ai fais

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Range("K2").Formula = "=AVERAGE(H4 : "H " &i))"
    Je ne comprend pas comment je dois changer ma formule.

    Je vous remercie beaucoup

  2. #2
    Expert éminent Avatar de mercatog
    Homme Profil pro
    Inscrit en
    Juillet 2008
    Messages
    9 435
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations forums :
    Inscription : Juillet 2008
    Messages : 9 435
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Range("K2").Formula = "=AVERAGE(H4:H" & i & ")"

  3. #3
    Membre averti
    Inscrit en
    Février 2012
    Messages
    11
    Détails du profil
    Informations forums :
    Inscription : Février 2012
    Messages : 11
    Par défaut
    Merci c'est impec

  4. #4
    Membre éprouvé
    Homme Profil pro
    Retraité
    Inscrit en
    Février 2012
    Messages
    75
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Février 2012
    Messages : 75
    Par défaut
    Bonjour,

    Je vous propose

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
     
     
    Dim MaPlage as Range
     
    Set MaPlage = Range("H2:H" & [H2].End(xlDown).Row)
    [K2] = WorksheetFunction.Average(MaPlage)
     
    Set MaPlage = Nothing
    Cdt

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [VBA Excel] problème de range avec find
    Par loacast dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 23/11/2005, 13h56
  2. Formulaires : problème avec les slashes et les quotes
    Par GarGamel55 dans le forum Langage
    Réponses: 1
    Dernier message: 12/10/2005, 15h59

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo