Le code dans le label ne fonctionne pas comme je voudrai

Version imprimable

18/06/2020, 10h25
plasto590807

Le code dans le label ne fonctionne pas comme je voudrai
Bonjour à tous et toutes,

Voici le code que j'ai créé mais rien n'apparait !
Code:

1 2 3 4 5 Private Sub Lab_LienDeParenté_Click() Lab_LienDeParenté.Caption = "Lien de Parenté avec " & cbb_NomsJoueurs & " " & ComboBox_PRENOM End Sub
Merci de votre aide
18/06/2020, 11h01
ARTURO83

Bonjour,

Essayez ceci

Code:

Lab_LienDeParenté.Caption = "Lien de Parenté avec " & cbb_NomsJoueurs & " " & ComboBox_PRENOM.text

Cdlt
18/06/2020, 13h32
plasto590807

il y a rien qui s'affiche malgré la modification du code !!
18/06/2020, 13h41
ARTURO83

Que vaut cbb_NomsJoueurs?
Qu'y a-t-il d'affiché dans la combobox?
Le label et la combobbox sont-ils dans un formulaire?

Donnez le maximum de renseignements, ou déposez votre fichier.
18/06/2020, 13h54
ARTURO83

Rappel: d'après votre code initial, vous voulez que cela s'affiche dans le label après avoir sélectionner un club avec la combobox et après avoir cliquer sur le label, c'est bien cela?

voici une petit fichier qui réagit suivant l'énoncé précédent, à l'ouverture du fichier, arrive un formulaire, choisissez le club puis cliquez sur le label:
Pièce jointe 573240
18/06/2020, 14h15
plasto590807

1) Dans cbb_NomJoueur , c'est un nom de famille ,en alphanumerique, qui provient d'un tableau.
2) Dans la combobox , il est affiché tout une liste de Noms de famille.
3) Le Label et les deux ComboBox (cbb_NomJoueur et cbb_PrenomJoueur) sont dans le formulaire (label et les 2 ComboBox).

vous me demandez si

Citation:

vous voulez que cela s'affiche dans le label après avoir sélectionner un Nom et Prenom avec la combobox et après avoir cliquer sur le label, c'est bien cela?

ma reponse est : OUI
18/06/2020, 15h54
ARTURO83

Avez-vous testé le fichier joint, il suffit d'y ajouter le combobox pour les noms?

sinon voici avec les 2 combobox
Pièce jointe 573261
20/06/2020, 16h30
plasto590807

Oui, j'ai testé le fichier joint. Je ne comprends pas . ça ne fonctionne pas chez moi et surtout ce que vous m'avez donné.

Excusez moi, je n'ai pas besoin de cliquer sur le Combobox. Je vois pas l'interet de le faire.
Je voudrai que le label s'affiche de suite dès que j'ai choisi un nom et un prénom dans les deux combobox

Salut,
Avec le code actuel le label ne se remplit qu'après un clic effectué dessus.
Pour faire ce que tu demandes je te propose quelque chose comme cela :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Dim NomChoisi, PrenomChoisi As Boolean
 
Private Sub cbb_NomsJoueurs_Change()
NomChoisi = True
MiseAJourLabel
End Sub
 
Private Sub ComboBox_PRENOM_Change()
PrenomChoisi = True
MiseAJourLabel
End Sub
 
Private Sub UserForm_Initialize()
NomChoisi = False
PrenomChoisi = False
End Sub
 
Private Sub MiseAJourLabel()
If NomChoisi And PrenomChoisi Then
Lab_LienDeParenté.Caption = "Lien de Parenté avec " & cbb_NomsJoueurs & " " & ComboBox_PRENOM.Text
End If
End Sub

Nullosse, le plus nul des apprentis programmeurs

Bonjour,

Citation:

plasto590807
Oui, j'ai testé le fichier joint. Je ne comprends pas . ça ne fonctionne pas chez moi et surtout ce que vous m'avez donné.
Excusez moi, je n'ai pas besoin de cliquer sur le Combobox. Je vois pas l'interet de le faire.
Je voudrai que le label s'affiche de suite dès que j'ai choisi un nom et un prénom dans les deux

Je me suis basé sur votre macro initiale qui ne pouvait que fonctionner que si l'on cliquait sur le label "Private Sub Lab_LienDeParenté_Click()", je vous rappelle aussi:

Citation:

plasto590807
vous me demandez si
vous voulez que cela s'affiche dans le label après avoir sélectionner un Nom et Prenom avec la combobox et après avoir cliquer sur le label, c'est bien cela?
ma reponse est : OUI

Excusez moi, je n'ai pas besoin de cliquer sur le Combobox. Je vois pas l'interet de le faire.
Je voudrai que le label s'affiche de suite dès que j'ai choisi un nom et un prénom dans les deux combobox

Nullose, ce n'est pas bon parce qu'à chaque sélection dans l'une des 2 combobox, la variable "NomChoisi" ou "PrenomChoisi" est perdue lors de la sélection de l'autre combobox.

Proposition:
Code:

1 2 3 4 5 6 7 8 9 10 11 Private Sub cbb_NomsJoueurs_Change() If cbb_NomsJoueurs.Text <> "" And ComboBox_PRENOM.Text <> "" Then Lab_LienDeParenté.Caption = "Lien de Parenté avec " & cbb_NomsJoueurs & " " & ComboBox_PRENOM.Text End If End Sub Private Sub ComboBox_PRENOM_Change() If cbb_NomsJoueurs.Text <> "" And ComboBox_PRENOM.Text <> "" Then Lab_LienDeParenté.Caption = "Lien de Parenté avec " & cbb_NomsJoueurs & " " & ComboBox_PRENOM.Text End If End Sub
Cdlt

21/06/2020, 00h09
Nullosse

Salut,

Citation:

Envoyé par ARTURO83

Bonjour,
Nullose, ce n'est pas bon parce qu'à chaque sélection dans l'une des 2 combobox, la variable "NomChoisi" ou "PrenomChoisi" est perdue lors de la sélection de l'autre combobox.

Les variables NomChoisi et PrenomChoisi sont globales donc leurs valeurs ne sont jamais perdues. Au départ quelque chose s'affiche dans le label lorsque l'on a sélectionné quelque chose dans les deux combobox puis ensuite le label peut changer lorsque l'on sélectionne quelque chose dans une des deux combobox. Le seul souci c'est lorsqu'on appelle plusieurs fois la boîte de dialogue. Dans ce cas il faut remettre à False les deux variables lorsque l'on ferme la boîte.
Nullosse
21/06/2020, 06h05
ARTURO83

Bonjour Nullosse,

Citation:

Les variables NomChoisi et PrenomChoisi sont globales donc leurs valeurs ne sont jamais perdues

Exact, j'ai zappé une partie du code.

Cdlt