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 :

User form et entrée différente dans un tableau excel


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Homme Profil pro
    Inscrit en
    Février 2012
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Février 2012
    Messages : 1
    Par défaut User form et entrée différente dans un tableau excel
    Bonjour à toute la communauté
    Déjà je tenais à félicité ce site qui nous fais apprendre tout les merveille de la programmation !

    Je vous explique mon problème,

    j'ai créer un simple userform pour faire mes essai avec un tableau excel

    l'idée c'est que quand je rentre mon code dans la premier zone de texte dans l'user form celui si s'ajoute bien dans la colonne A et passe ensuite à la ligne.

    Mais comment lui dire que si le numéro est identique à une des ligne de la colonne A, qu'il ne l'ajoute pas à la ligne en bas mais qu'il complète la ligne du numéro du mur et module suivant la deuxième entré de l'user form

    dans la deuxième saisi userform sera rentré des noms de machine (les même nom que dans les colonnes d'excel)

    l'idée si le nom weinman est écrit, il m'ajoute la date de quand a été pointé ce murs du module numéro ... dans la colonne weinmann

    je ne sais vraiment pas si je suis assez claire.

    je vous envoie donc le fichier en pièce jointe pour voir si qqn aurais une solution (surtout pour comprendre peut être mieux :p)

    Pour ouvrir l'user form cliquez sur % du clavier (l'idée ces l'utilisation d'une douchette avec un system de code bar, donc le clic de la douchette ouvrira le formulaire)

    Cordialement
    Fichiers attachés Fichiers attachés

  2. #2
    Membre confirmé
    Homme Profil pro
    Développeur amateur VBA Excel
    Inscrit en
    Janvier 2013
    Messages
    69
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur amateur VBA Excel
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Janvier 2013
    Messages : 69
    Par défaut
    Bonjour,

    Mais comment lui dire que si le numéro est identique à une des ligne de la colonne A, qu'il ne l'ajoute pas à la ligne en bas mais qu'il complète la ligne du numéro du mur et module suivant la deuxième entré de l'user form
    Pour ce faire pour commencer, j'utiliserais une boucle qui lirait dans chaque ligne le contenu de la cellule de la première colonne et une condition pour savoir si le contenu de la cellule est égal au contenu de ton textbox.
    Pour les boucles : ici ou ici
    Pour la condition : ici

  3. #3
    Membre Expert
    Femme Profil pro
    Ingénieur
    Inscrit en
    Octobre 2016
    Messages
    1 703
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 30
    Localisation : France, Indre et Loire (Centre)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Octobre 2016
    Messages : 1 703
    Par défaut
    Bonjour,
    Citation Envoyé par Limace_hurlante Voir le message
    Pour ce faire pour commencer, j'utiliserais une boucle qui lirait dans chaque ligne le contenu de la cellule de la première colonne et une condition pour savoir si le contenu de la cellule est égal au contenu de ton textbox.
    La boucle marcherait, en effet, mais il y a plus rapide et efficace : la méthode Application.Match. Cette méthode te permet de trouver la position (donc la ligne) d'un mot dans une liste de mot. Elle renvoie une erreur si le mot n'a pas pu être trouvé. Supposons que les noms à trouver sont dans la colonne A :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Dim ligne As Long
    If Not IsError(Application.Match(textbox.Value, Range("A:A"), 0) Then       'cas où on trouve une correspondance
        ligne = Application.Match(textbox.Value, Range("A:A"), 0)        'on récupère le numero de ligne où se trouve le nom
    Else                                                                'cas où on ne trouve pas de correspondance
        'ligne = dernière ligne ?
    End If
    J'espère que ça te permettra d'avancer !

    NB : En ce qui concernce le fichier joint : https://www.developpez.net/forums/d8...s-discussions/

  4. #4
    Expert éminent
    Avatar de Marc-L
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Avril 2013
    Messages
    9 468
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

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

    Informations forums :
    Inscription : Avril 2013
    Messages : 9 468
    Par défaut
    Bonjour,

    afin d'éviter un double calcul de Match (la fonction EQUIV d'Excel version française),
    affecter directement le résultat de Match dans une variable de type Variant représentant donc le numéro de ligne
    et à contrôler au choix via les fonctions IsError et IsNumeric

    ___________________________________________________________________________________________________________
    Je suis Paris, Egypte, Stockholm, London, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

  5. #5
    Rédacteur/Modérateur


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    Novembre 2003
    Messages
    19 125
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : Novembre 2003
    Messages : 19 125
    Billets dans le blog
    131
    Par défaut
    Salut.

    En plus de la remarque de Marc, je propose de ne pas effectuer la recherche sur A:A

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.Match(textbox.Value, Range("A:A"), 0)
    Il serait me semble-t-il plus judicieux d'utiliser des tableaux structurés et la référence structurée comme nom de plage VBA... En plus de limiter correctement la plage de recherche, ça permet de limiter la dépendance entre le code VBA et la structure de la feuille (en cas de déplacement de colonne, par exemple, voire même de déplacement du tableau entier sur une autre feuille, car le code utilisant la référence structurée continuera à fonctionner sans problème). De plus, le fait de créer une fonction pour récupérer la position permet de mettre une gestion pertinente des erreurs éventuelles (non trouvé, ...).

    Nom : image.png
Affichages : 166
Taille : 62,9 Ko
    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

Discussions similaires

  1. [MySQL] Récupérer le nombre d'entrées différentes dans MYSQL
    Par Boub.J dans le forum PHP & Base de données
    Réponses: 5
    Dernier message: 21/05/2009, 22h13
  2. afficher descriptifs de tailles différentes dans un tableau de taille fixe
    Par poupouille dans le forum Balisage (X)HTML et validation W3C
    Réponses: 1
    Dernier message: 02/02/2008, 22h27
  3. Réponses: 5
    Dernier message: 25/06/2007, 09h51
  4. VBA-E Recherche des différents noms dans mon tableau excel
    Par tazmania dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 16/04/2007, 19h31
  5. Réponses: 3
    Dernier message: 01/03/2007, 16h26

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