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 :

Numéro de zone de texte [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
    Inscrit en
    Novembre 2008
    Messages
    15
    Détails du profil
    Informations forums :
    Inscription : Novembre 2008
    Messages : 15
    Par défaut [Résolu] Numéro de zone de texte
    Bonjour à tous,
    je suis en train d'écrire une routine qui modifie toute une série de graphiques en fonction de certaines données entrées sur une feuille.
    Il y a des zones de texte sur ces graphiques, que j'aimerais modifier dans ma routine. Voici les commandes employées :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    ActiveChart.Shapes("Text Box #").Select
    Selection.Formula=Hadr
    Hadr est la variable dans laquelle j'ai stocké la formule reliant à la cellule du contenu que je veux mettre dans ma zone de texte et # le numéro de la zone de texte.


    Comme je dois faire un certain nombre de graphiques, j'aimerais pouvoir modifier ce numéro car il est différent sur chacun. Connaissez-vous un moyen ?
    Merci d'avance de votre aide et bonne journée à tous ;-)

  2. #2
    Membre Expert Avatar de Fvandermeulen
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juillet 2007
    Messages
    1 869
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 49
    Localisation : Belgique

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Juillet 2007
    Messages : 1 869
    Par défaut
    Salut,
    Si tu n'as qu'une zone de texte par graphique, ceci devrait le faire (!! j'ai pas testé )

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    ActiveChart.Shaoes(1).Select
    Selection.Formula=Hadr
    A+

  3. #3
    Membre averti
    Inscrit en
    Novembre 2008
    Messages
    15
    Détails du profil
    Informations forums :
    Inscription : Novembre 2008
    Messages : 15
    Par défaut
    Salut Fvandermeulen et merci pour ta réponse,
    Le problème, c'est que j'ai plusieurs zones de texte par graphique et que celle que je veux modifier porte sur chacun un numéro différent... Un copier coller demanderait trop de travail vu que les graphiques sont aussi différents.

  4. #4
    Membre Expert Avatar de Fvandermeulen
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juillet 2007
    Messages
    1 869
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 49
    Localisation : Belgique

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Juillet 2007
    Messages : 1 869
    Par défaut
    Re,

    Le problème, c'est que j'ai plusieurs zones de texte par graphique et que celle que je veux modifier porte sur chacun un numéro différent
    Attention, le numéro du nom de la zone de texte n'est pas le numéro d'index dont je parle, tu peux avoir par exemple "Zone de texte 2" et un index = à 1.
    Tu peux facilement vérifier avec la première ligne du code. L'idée est qu'il faut que tes zone de textes aient le même index.

    Sinon, y a t'il un élément qui permet de dire quel Zone de texte est celle qu'il te faut (par son contenu par exemple) ?

    A+

  5. #5
    Membre averti
    Inscrit en
    Novembre 2008
    Messages
    15
    Détails du profil
    Informations forums :
    Inscription : Novembre 2008
    Messages : 15
    Par défaut
    Comment peut-on alors être sur de désigner la bonne zone de texte dans l'instruction de sélection ? Y a-t-il moyen de voir l'index propre à une zone de texte ?

  6. #6
    Membre Expert Avatar de Fvandermeulen
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juillet 2007
    Messages
    1 869
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 49
    Localisation : Belgique

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Juillet 2007
    Messages : 1 869
    Par défaut
    Ben je crois que t'as pas d'autre choix que de tester, désolé...mais tu peux créer un petit code qui boucle sur toute tes feuilles et toutes tes zones de textes qui te renvoi sur une feuille le N° d'index et le contenu de la zone de texte, ça te permettra facilement de voir si elles ont toutes le même N° d'index.

    Ou comme je l'ai déjà dit, le contenu permet de les distinguer (si c'est la seule zone de texte qui ne contient pas de nombre, si c'est la seule dont le nombre de caractère est supérieur à x, ...).
    Dans ce cas, idem, boucle sur toutes les feuilles et zone de texte avec test du contenu, si correspond adapte le contenu, sinon continue la boucle.

    A+

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

Discussions similaires

  1. Réponses: 2
    Dernier message: 10/06/2007, 12h18
  2. Récupérer le numéro d'enregistrement dans une zone de texte
    Par The_Super_Steph dans le forum VBA Access
    Réponses: 18
    Dernier message: 16/05/2007, 08h50
  3. Alinéa de Zone de texte
    Par oazar dans le forum Flash
    Réponses: 3
    Dernier message: 10/12/2003, 11h52
  4. fonction qui initialise a blanc zone de texte
    Par access dans le forum Requêtes
    Réponses: 1
    Dernier message: 27/11/2003, 16h36
  5. zones de texte
    Par divableue dans le forum ASP
    Réponses: 2
    Dernier message: 07/11/2003, 14h32

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