Formule pour recupérer la valeur dans un combobox

[suistrop]

Bonjour,
je voudrais recuperer la valeur d un combobox dans une cellule.

Je cherche a mettre dans ma cellule une formule du type :

=combobox1.value

mais cela ne marche pas.

Merci !

 

[jp14]

Re : Formule pour recupérer la valeur dans un combobox

Bonjour

Il faudrait écrire

Private Sub ComboBox1_Change()
sheets("feuil1").range("a1")=combobox1.value
End Sub

JP

 

[suistrop]

Re : Formule pour recupérer la valeur dans un combobox

Merci de ta réponse JP14.

en faite je veux crer une fonction dans la cellule du genre index ou rechercheV avec la variable presente dans la combobox.

merci.

 

[job75]

Re : Formule pour recupérer la valeur dans un combobox

Bonjour suistrop, JP, le forum,

Le fichier joint sera peut-être utile.

A+

 

[suistrop]

Re : Formule pour recupérer la valeur dans un combobox

salut , merci pour ton fichier en faite ca serait plutot si il existe une facon de récupéré la valeur de la combobox directement afin de la mettre dans une cellule sinon je peux utiliser ta méthode et une cellule intermédiaire !

 

[job75]

Re : Formule pour recupérer la valeur dans un combobox

Re,

Quand la ComboBox est créée avec la Boîte à outils contrôles (ActiveX), la valeur s'inscrit directement dans la cellule (si c'est la cellule liée dans la propriété LinkedCell). Plus besoin de formule...

A+

 

[suistrop]

Re : Formule pour recupérer la valeur dans un combobox

oui mais si je veux ecrire des formules du type :
=combobox1.value + 3

ou des recherche matricielle...

 

[job75]

Re : Formule pour recupérer la valeur dans un combobox

Re,

Avec une ComboBox dans la feuille et des formules dans la feuille, la seule solution me semble-t-il est d'utiliser la cellule liée. Elle est là pour ça.

A+

 

[suistrop]

Re : Formule pour recupérer la valeur dans un combobox

c est noté merci ++++

 

[peper_eliot]

Re : Formule pour recupérer la valeur dans un combobox

Re,

Quand la ComboBox est créée avec la Boîte à outils contrôles (ActiveX), la valeur s'inscrit directement dans la cellule (si c'est la cellule liée dans la propriété LinkedCell). Plus besoin de formule...

A+

Ahhh, un vieux p'tit fil qui m'interresse 😉
Bonsoir à tous les couches-tard

Alors, je rebondis sur cette réponse pour dir "Ok, la ComboBox ActiveX est bien LinkedCell avec ma cellule et je penssais... "Super!"
Maisle problème c'est que si je tri ou masque mon tableau, ben ça le fait plus...

En fait, le souci est similaire : J'ai une ComboBox ActiveX
Je vais chercher les valeurs dans le Tableau1

Private Sub ComboBox1_DropButtonClick()
Dim S1
Dim c
'N° de semaine
S1 = Range("K3")
ComboBox1.Clear 'Sinon, à chaque DropButtonClick, je réinsère les valeurs...Pas trouvé mieux... je cherche encore
'//boucle sur les cellules non vides
For Each c In Range("Tableau1[" & S1 & "]")
    If c > 0 Then
        With ComboBox1
        .AddItem c.Offset(0, -2)
        .List(.ListCount - 1, 1) = c.Offset(0, -1)
        End With
    End If
Next
End Sub

Donc une fois que ma Combo est pleine, j'aimerai que la valeur par défaut qui soit affichée soit celle de la cellule L3
Mais là, je cherche encore

En fait, c'est même plus complexe que ça
Dans le cas ou le tableau 1 bouge, ben je devrai même etre capable de dire..."Houlà, stop, ce gars n'est plus là...il faut en trouver un autre dans la nouvelle liste mise à jour de la comboox...


Voilà, en vrac, mais avec un petit classeur qui vaut bien mille mots 😉