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 :

[Créer une VBA pour chercher des valeurs] [XL-2010]


Sujet :

Macros et VBA Excel

Mode arborescent

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Étudiant
    Inscrit en
    Septembre 2014
    Messages
    53
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Val de Marne (Île de France)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Septembre 2014
    Messages : 53
    Par défaut [Créer une VBA pour chercher des valeurs]
    Bonjour,
    Je suis actuellement face à un problème que je n'arrive pas à résoudre :
    J'ai dans une feuille de mon classeur des identifications de tronçons (dans l'exemple en PJ : Tron_01 jusqu'à 03) et dans une autre feuille des points composant ces tronçons avec leurs coordonnées x,y. Donc il y a plusieurs points par tronçons.
    J'ai fais la moyenne des points par tronçon (qui correspond à la moyenne de chaque tronçon). Sauf que comme vous pouvez le voir dans l'exemple, il y a des fois où la moyenne se situe en début de tronçon et d'autre fois en fin de tronçon.

    Ce que je souhaiterais faire, c'est, lorsque je suis dans la feuille 1, récupérer les moyennes qui sont dans la feuille 2 pour les mettre en face des bons tronçons.

    Par exemple, dans le fichier joint, je veux en face du Tron_01 la moyenne x=1.26666 etc.

    J'ai essayé de faire un simple RECHERCHEV, mais ça ne marche que quand la moyenne se situe en début de tronçon. Je pourrais manuellement remonter mes moyennes à chaque fois mais j'en ai plus de 1000 ce qui rend compliqué cette procédure.

    J'ai donc essayé de créer une VBA de cette manière (en gros):

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    Function Coordonne(texte As String) As Single
     
    i = 1
    j= 2
    Sheet("Feuil2").Select
     
    While Cells(i,j)<>texte
    i=i+1
    Wend
    While Cells(i,j+3)=""
    i=i+1
    Wend
     
    Coordonne = Cells(i,j+3)
     
    End Function
    En gros : je clique sur le tronçon qui m'interesse dans la feuille 1, je lui dis de chercher dans la feuille 2 cet identifiant, et si la colonne des Xmoyen est vide, de descendre jusqu'à trouver la valeur et de l'écrire dans la case X de la feuille 1

    Est ce compréhensible ?

    Si quelqu'un peut m'aider ça serait top !
    Fichiers attachés Fichiers attachés

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

Discussions similaires

  1. Réponses: 2
    Dernier message: 07/10/2015, 15h31
  2. Créer une fonction pour ajouter des clés/valeurs dans ma hashmap
    Par khalous91 dans le forum Collection et Stream
    Réponses: 2
    Dernier message: 05/05/2015, 13h40
  3. Réponses: 21
    Dernier message: 23/05/2007, 16h16
  4. [VB6]créer une requete pour chercher une partie d'un mot
    Par aibar dans le forum VB 6 et antérieur
    Réponses: 3
    Dernier message: 11/06/2006, 21h38
  5. Boucler sur une table pour renommer des valeurs
    Par webwhisky dans le forum PostgreSQL
    Réponses: 2
    Dernier message: 03/01/2006, 14h19

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