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 :

Listview et alimentation combo et textbox


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2005
    Messages
    179
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2005
    Messages : 179
    Par défaut Listview et alimentation combo et textbox
    Bonjour je débute avec le listview et j'ai quelques difficultés.

    En sélectionnant une valeur du listview, je cherche à alimenter les combo et les textbox qui ont précédemment servi dans un USF à alimenter la ligne du listview.

    Mais mon code est inefficace :-(

    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
    20
    21
    22
    23
    24
    25
    26
     
    Private Sub listview1_click()
     
    Dim i As Integer
    Dim Ctrl1 As Control
     
    For i = 1 To ListView1.ListItems.Count
     
        If ListView1.ListItems(i).Selected = True Then
            'Je déverrouille mes contrôles
            For Each Ctrl1 In Controls
                If TypeOf Ctrl1 Is MSForms.ComboBox Or TypeOf Ctrl1 Is MSForms.TextBox Then
                    Ctrl1.Enabled = False
                End If
            Next
     
            With ListView1.ListItems(i)
                MsgBox .ListSubItems(2).Text
                .ListSubItems(2).Text = frmEcranSaisie.txtDate.Value 'alimentation d'un textbox
     
    (...) 
                End With
        End If
    Next
     
    End Sub
    La valeur du textbox ne s'affiche pas.

    D'autre part comment faire pour alimenter un combo ? Sachant que les combo sont alimentés par des valeurs (1,2,3...) et si la valeur du listview est 2 je souhaiterais que le combo se place à 2 mais laisse la possibilité de choisir 1 ou 3 pour une modification.

    Mais là j'avoue être complément perdue :-(

    Help me please

  2. #2
    Membre éclairé
    Profil pro
    Inscrit en
    Novembre 2007
    Messages
    306
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2007
    Messages : 306
    Par défaut
    Alors :

    ne "déverouille pas... au contraire

    Et je ne comprends pas la suite de ta question sur l'alimentation du combobox : 1,2 et 3 ce sont les index des éléments ou les éléments eux-mêmes ?

    Pour alimenter un combo :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    For A=1 to 3
      MonCombo.additem A
    Next
    Pour le positionner par défaut sur 2 :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    MonCombo.Value=MonCombo.List(1)

    Cdt

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2005
    Messages
    179
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2005
    Messages : 179
    Par défaut
    Pardon ce sont les éléments eux meme des combo

    Ce sont les textes "toto", "tata" "titi" par exemple.

  4. #4
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2005
    Messages
    179
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2005
    Messages : 179
    Par défaut
    Pas de problème pour alimenter ma liste de départ du combo.

    Mais ma problématique exacte est la suivante : je dispose d'un listview remplie à partir d'une feuille excel.

    Lorsque je sélectionne une ligne de ce listview j'aimerais pouvoir alimenter mon combo de telle manière que la valeur correspondant dans le listview corresponde à la même valeur que le combo.

    Exemple : valeurs combo = titi, tata, tutu

    Lorsque je sélectionne la ligne dans mon listview avec la valeur "tata" j'aimerais que cette valeur se mette correctement au niveau du combo et que celui ci me propose toujours titu et tutu par ailleurs.

    Comment faire coïncider les deux valeurs?

    Par avance merci pour votre aide là je suis perdu :-(

  5. #5
    Membre habitué
    Inscrit en
    Janvier 2008
    Messages
    10
    Détails du profil
    Informations forums :
    Inscription : Janvier 2008
    Messages : 10
    Par défaut Listview et alimentation combo et textbox
    Est ce que t'as vérifié l'incrémentation de ton I ?

Discussions similaires

  1. [WD15] alimentation combo par programmation
    Par fr832 dans le forum WinDev
    Réponses: 2
    Dernier message: 08/01/2012, 18h54
  2. [WB] Alimentation combos associées
    Par lumbroso dans le forum WebDev
    Réponses: 3
    Dernier message: 24/03/2009, 19h59
  3. Combo et Textbox
    Par faycalche dans le forum VB 6 et antérieur
    Réponses: 5
    Dernier message: 15/08/2008, 19h03
  4. [VBA-E] alimenter combo depuis une zone de cellules (non determinée)
    Par LostIN dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 12/12/2006, 11h24
  5. Réponses: 3
    Dernier message: 25/03/2004, 11h35

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