Valeur TextBox

Le
DAVID
Bonjour

J'initialise une "zone de liste modifiable" grâce à ceci :

Private Sub UserForm_Initialize()
CmbAlias.RowSource = ("BD!MaListe")
CmbAlias.ListIndex = -1
End Sub

"MaListe" étant une plage (colonne C) nommée avec "Insertion/Nom/Définir"

J'aimerais récupérer dans une "Zone de Texte" la valeur de la colonne D en
rapport au choix de la "zone de liste modifiable"

Faut il créer une autre plage donnée ?

Merci de votre aide


Private Sub CmbAlias_Change()

End Sub
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
michdenis
Le #20950421
Bonjour David,

Ta zone de liste est défini avec une plage de cellules ("BD!MaListe")

'Tu obtiens l'index de la valeur affichée dans le combobox
z= CmbAlias.ListIndex

Tu appliques cet index "z" à la plage source de ton combobox
et tu décales d'une colonne pour obtenir la valeur D sur la même
ligne de ta plage source
Msgbox Range("BD!MaListe")(z).offset(,1).value




"DAVID"
Bonjour

J'initialise une "zone de liste modifiable" grâce à ceci :

Private Sub UserForm_Initialize()
CmbAlias.RowSource = ("BD!MaListe")
CmbAlias.ListIndex = -1
End Sub

"MaListe" étant une plage (colonne C) nommée avec "Insertion/Nom/Définir"

J'aimerais récupérer dans une "Zone de Texte" la valeur de la colonne D en
rapport au choix de la "zone de liste modifiable"

Faut il créer une autre plage donnée ?

Merci de votre aide


Private Sub CmbAlias_Change()

End Sub
DAVID
Le #20951031
Bonsoir et merci pour ton aide

J'ai fais comme ceci. C'est bon ? En tout cas cela fonctionne !!

Private Sub CmbAlias_Change()
Txt1.Value = Range("BD!MaListe")(CmbAlias.ListIndex + 1).Offset(, 1).Value
End Sub
michdenis
Le #20951331
Une légère correction.

Le premier élément d'un combobox a comme index 0
En conséquence, cette ligne de code:
Msgbox Range("BD!MaListe")(z).offset(,1).value
devrait être modifié comme ceci :
Msgbox Range("BD!MaListe")(z+1).offset(,1).value





"michdenis"
Bonjour David,

Ta zone de liste est défini avec une plage de cellules ("BD!MaListe")

'Tu obtiens l'index de la valeur affichée dans le combobox
z= CmbAlias.ListIndex

Tu appliques cet index "z" à la plage source de ton combobox
et tu décales d'une colonne pour obtenir la valeur D sur la même
ligne de ta plage source
Msgbox Range("BD!MaListe")(z).offset(,1).value




"DAVID"
Bonjour

J'initialise une "zone de liste modifiable" grâce à ceci :

Private Sub UserForm_Initialize()
CmbAlias.RowSource = ("BD!MaListe")
CmbAlias.ListIndex = -1
End Sub

"MaListe" étant une plage (colonne C) nommée avec "Insertion/Nom/Définir"

J'aimerais récupérer dans une "Zone de Texte" la valeur de la colonne D en
rapport au choix de la "zone de liste modifiable"

Faut il créer une autre plage donnée ?

Merci de votre aide


Private Sub CmbAlias_Change()

End Sub
DAVID
Le #20951471
Merci

C'est exactement ce que j'avais fait après avoir fait des essais.

C'est dur mais je commence à comprendre un peu !!

Bonne soirée
Publicité
Poster une réponse
Anonyme