Lier une cellule a une liste combobox

[pibale]

Bonjour à tous

Voici mon problème
J'aimerai changer la police d'une liste déroulante créée avec la boite à outil Formulaire ou lier une cellule à une liste déroulante créée avec ]a boite à outil Contrôles (pour obtenir le même résultat).
Voir le fichier joint pour comprendre mieux ma question

 

[kjin]

Re : Lier une cellule a une liste combobox

Bonjour,
Pour la première non
pour la seconde, tu as la propriété Linkedcell dans la liste des propriétés, il suffit de mettre A9
A+
kjin

 

[jeanpierre]

Re : Lier une cellule a une liste combobox

Bonjour pibale,

our la première sur ta feuille, la réponse est non.

Pour la seconde, tu cliques sur l'équerre de la boîte à outilsd contrôle (par affichage/Barres d'outils) et clic droit ensuite sur l'objet, choisir Propriétés et de là Font, Forecolor. Par clic sur la zone à droite, 3 petits points s'affichent, te reste à choisir...

Linkedcell et l'adresse pour la cellule.

Dis-nous si tu n'y arrives pas.

A te lire.

Bon WE

Jean-Pierre

 

[pibale]

Re : Lier une cellule a une liste combobox

Bonjour pibale,

our la première sur ta feuille, la réponse est non.

Pour la seconde, tu cliques sur l'équerre de la boîte à outilsd contrôle (par affichage/Barres d'outils) et clic droit ensuite sur l'objet, choisir Propriétés et de là Font, Forecolor. Par clic sur la zone à droite, 3 petits points s'affichent, te reste à choisir...

Linkedcell et l'adresse pour la cellule.

Dis-nous si tu n'y arrives pas.

A te lire.

Bon WE

Jean-Pierre

Merci de votre réponse rapide, mais ce n'est pas tout a fait cela que je désire.
Je voudrai que la cellule a9 me renvoie la position 4 de DURANT dans la liste Noms.
Excusez moi je me suis mal exprimé.
Voir fichier joint.

MERCI d'avance

voici le fichier

 

[kjin]

Re : Lier une cellule a une liste combobox

Re, salut jean-pierre,
Alors comme ceci, dans le module de la feuille

Private Sub ComboBox1_Change()
Range("A9") = ComboBox1
Range("A10") = ComboBox1.ListIndex + 1

End Sub

Dans ta liste nommée il y a aussi noms !
A+
kjin

 

[pibale]

Re : Lier une cellule a une liste combobox

Re, salut jean-pierre,
Alors comme ceci, dans le module de la feuille

Private Sub ComboBox1_Change()
Range("A9") = ComboBox1
Range("A10") = ComboBox1.ListIndex + 1

End Sub

Dans ta liste nommée il y a aussi noms !
A+
kjin

Ca marche

Merci beaucoup