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 :

Evaluation de variable VBA lors de l'éxécution [XL-2003]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Décembre 2006
    Messages
    27
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2006
    Messages : 27
    Par défaut Evaluation de variable VBA lors de l'éxécution
    Bonjour à tous,
    je viens solliciter vos compétences pour m'aider à trouver une solution à mon problème.
    Savez vous s'il est possible, et si oui, comment, de faire évaluer par VBA des variables lors de l'éxécution.

    En pratique, j'ai un code qui change la plage de données d'un graphique de la manière suivante :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ActiveChart.SeriesCollection(1).Values = [plage_40]
    ou plage_40 correspond à une plage de données dans mon classeur

    Ce que je cherche à faire, c'est écrire le même code, mais en utilisant une variable à la place du nom de la plage.
    par exemple :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    nom plage = "plage_40"
    ActiveChart.SeriesCollection(1).Values = nom_plage
    le souci est que je n'arrive pas à trouver la syntaxe pour faire celà.

    Merci d'avance pour votre aide,

    TAZ

  2. #2
    Membre émérite Avatar de issoram
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Janvier 2009
    Messages
    665
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Saône et Loire (Bourgogne)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Janvier 2009
    Messages : 665
    Par défaut
    Et comme ça?

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    nom plage = "plage_40"
    ActiveChart.SeriesCollection(1).Values = Range(nom_plage)

  3. #3
    Expert confirmé
    Homme Profil pro
    aucune
    Inscrit en
    Septembre 2011
    Messages
    8 208
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : Septembre 2011
    Messages : 8 208
    Par défaut
    Bonjour,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim nom_plage As Range
    Set nom_plage = [plage_40]
    ActiveChart.SeriesCollection(1).Values = nom_plage

  4. #4
    Membre averti
    Profil pro
    Inscrit en
    Décembre 2006
    Messages
    27
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2006
    Messages : 27
    Par défaut
    Citation Envoyé par issoram Voir le message
    Et comme ça?

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    nom plage = "plage_40"
    ActiveChart.SeriesCollection(1).Values = Range(nom_plage)
    J'ai honte...
    A force d'avoir le nez sur mon code, je n'y ai même pas pensé.
    Merci beaucoup, ca marche nickel



    Citation Envoyé par Daniel.C Voir le message
    Bonjour,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim nom_plage As Range
    Set nom_plage = [plage_40]
    ActiveChart.SeriesCollection(1).Values = nom_plage
    Bonjour,
    merci pour ton aide également. je n'ai pas essayé ton code, mais ce doit etre l'équivalent de la proposition d'issoram sur le principe. Cependant, elle ne permet pas d'utiliser, comme dans mon problème initial, la notion de variable.
    plage_40 est en dur, et je souhaiterais pouvoir changer cela dans mon code.
    Mais cela marche impeccabel avec le code précédent, donc encore merci à vous.

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

Discussions similaires

  1. 2003 VBA: Evaluer une variable dans OpenForm
    Par Jean_Benoit dans le forum Access
    Réponses: 3
    Dernier message: 24/02/2007, 23h01
  2. [VBA-E]Problème d'éxécution de macros à l'ouverture d'éxcel
    Par mulot03 dans le forum Macros et VBA Excel
    Réponses: 12
    Dernier message: 26/04/2006, 18h02
  3. [VB.Net]Executer le code just lors de l'éxécution de l'appli
    Par NiamorH dans le forum Windows Forms
    Réponses: 3
    Dernier message: 03/04/2006, 08h16
  4. [vb.net] erreur lors de l'éxécution d'une classe
    Par os_rasta dans le forum VB.NET
    Réponses: 10
    Dernier message: 01/12/2005, 18h34
  5. [VBA EXCEL] Problème d'éxécution avec graphiques
    Par RedBurn dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 28/11/2005, 09h55

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