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 :

Recherche à partir d'un label ? [XL-2003]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éprouvé
    Homme Profil pro
    Assistant aux utilisateurs
    Inscrit en
    Septembre 2007
    Messages
    1 896
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France

    Informations professionnelles :
    Activité : Assistant aux utilisateurs
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 896
    Par défaut Recherche à partir d'un label ?
    Bonjour à tous,

    Ma question est dans l'intitulé du sujet. Peux-t'on faire une recherche à partir d'un label ?

    Par exemple : J'ai des labels nommés "Eau", "Electricité", "Travaux"

    Dans les TextBoxs mises à côté des labels je souhaiterai que le montant pour chaque label s'affiche mais est-ce possible ?
    Merci par avance pour vos réponses

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Peux-tu détailler un peu plus, car tu peux modifier ou prendre l'information du Label avec la propriété Caption.

    Philippe

  3. #3
    Membre éprouvé
    Homme Profil pro
    Assistant aux utilisateurs
    Inscrit en
    Septembre 2007
    Messages
    1 896
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France

    Informations professionnelles :
    Activité : Assistant aux utilisateurs
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 896
    Par défaut
    Ce que je cherche à faire, c'est utiliser le Label comme donnée de recherche.
    Par exemple :


    3 labels dans un UserForm "Eau", "Gaz" et "Electricité". Ces labels correspondent au titre de la TextBox dans lesquelles doivent être indiquée la somme du coût de l'eau (données dans une feuille Excel) et idem pour les autres. Pour être plus précis, supposons que je veuille savoir quel est le coût de l'eau, du gaz et de l'électricité pour le Gymnase 1, alors dans une Combo je choisi "Gymnase 1" et dans la TextBox "Eau" le montant est indiqué, dans la TextBox "Electricité" le coût de l'électricité et idem pour Gaz

  4. #4
    Invité
    Invité(e)
    Par défaut
    Re

    Excuses moi, mais c'est complètement illogique.

    C'est par rapport aux données dans des zones de textes que l'on fait des recherches, car les label (sauf cas particuliers) sont figés.

    Philippe

  5. #5
    Membre éprouvé
    Homme Profil pro
    Assistant aux utilisateurs
    Inscrit en
    Septembre 2007
    Messages
    1 896
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France

    Informations professionnelles :
    Activité : Assistant aux utilisateurs
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 896
    Par défaut
    Citation Envoyé par Philippe JOCHMANS Voir le message
    Re

    Excuses moi, mais c'est complètement illogique.

    C'est par rapport aux données dans des zones de textes que l'on fait des recherches, car les label (sauf cas particuliers) sont figés.

    Philippe
    Tu réponds en partie à ma question, car je voulais utilser le label comme base de recherche, qu'il soit figé n'est pas important au contraire. Mais j'espère mettre bien expliqué. Le label ne change pas, seules les données des TextBoxs bougent en fonction du choix du bâtiment et les labels ne sont là que pour servir à la recherche.
    Je souhaitais faire quelque chose comme :
    Si Combo = Données et Si Label1 = Eau alors TextBox1 = somme des dépenses d'eau se trouvant dans une feuille "X" et correspondant au nom du bâtiment de la Combo

  6. #6
    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
    Bonsoir,
    par exemple 2 labels Label1 (eau) et Label2 (gaz) (caption entre parenthèses)
    2 textbox correspondants aux 2 labels TextBox1 et TextBox2
    une combo
    par boucles, en A batiment, en B, type, en C montants
    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
    17
    18
    19
    Private Sub CommandButton1_Click()
    Dim i As Long
    Dim j As Byte
    Dim som As Double
    with sheets("X")
    For j = 1 To 2
        som = 0
        Me.Controls("TextBox" & j).Value = 0
        For i = 2 To .Range("A1").End(xlDown).Row 'pas de vides entre ligne
            If .Range("A" & i) = Me.ComboBox1 Then
                If .Range("B" & i) = Me.Controls("Label" & j).Caption Then
                    som = som + .Range("C" & i)
                    Me.Controls("TextBox" & j).Value = som
                End If
            End If
        Next i
    Next j
    end with
    End Sub

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

Discussions similaires

  1. [VBA|E-03] Fonction recherche à partir d'un combobox
    Par DVano dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 04/12/2008, 10h58
  2. Recherche à partir d'un formulaire sur l'appuie sur Entrée
    Par talrashha dans le forum VBA Access
    Réponses: 1
    Dernier message: 29/07/2008, 13h41
  3. Moteur de recherche à partir d'une liste de critères
    Par ionnette dans le forum Requêtes et SQL.
    Réponses: 13
    Dernier message: 27/06/2008, 09h30
  4. addition a partir d'un label
    Par fabian123 dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 18/03/2008, 19h02
  5. Problème de recherche à partir des dates(VB 6)
    Par Saamdpawendé dans le forum VB 6 et antérieur
    Réponses: 3
    Dernier message: 24/08/2006, 16h11

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