OVH Cloud OVH Cloud

rafraichissement combobox

17 réponses
Avatar
Pierre.M
Salut a tous,

Sur une feuille excel j'ai un combobox qui recupere le contenu de la
cellule A1. Jusque la pas de probleme. Par contre je n'arrive pas a
obtenir le rafraichissement automatique de mon combobox des que la
valeur de A1 change. Il me faut d'abord cliquer sur la fleche pour
selectionner la bonne valeur, mon combobox conservant la dernier valeur.

Y a-t-il un truc pour modifier ce comportement?

Merci a tous et bonne soiree.

Pierre.M

7 réponses

1 2
Avatar
Pierre.M
Bonjour iSteph et AV,

je suis vraiment desole, mais je n'arrive pas a faire fonctionner ce
truc sur ma machine (excel97 sur Win98).

Ca marche (une seule fois) seulement si je selectionne d'abord la
valeur de A1 dans mon combobox et que ensuite je modifie la valeur de
A1, ce qui ne m'arrange pas du tout... Dans tous les autres cas la
nouvelle valeur est bien disponible dans le combobox (en "2eme"
position) et je suis donc obliger de la selectionner "manuellement"
(j'obtenais le meme resultat sans la macro de AV en mettant A1 dans la
propriete ListFillRange du combo) et ca ca ne m'arrange pas non plus ;-(

Peut-etre que j'oublie quelque chose? En tous cas merci a tous les deux.

Amicalement.

Pierre
Avatar
AV
Pour être bien sur qu'on parle de la même chose, teste le classeur joint, qui
fonctionne parfaitement chez moi (en utilisant XL97)

http://cjoint.com/?lkmfYLhZJg

AV
Avatar
Pierre.M
Salut Alain,

oui, la ca marche, mais tu rentre ta valeur directement en A1. Dans mon
cas il y a une formule en A1 (index/equiv) et c'est la valeur que je
voudrais recuperer. Et la ca ne fonctionne pas. j'aurais du etre plus
clair dans ma demande...
Ne faudrait-il pas mettre un "calculate" a quelque part (souvenir d'une
lecon d'iSteph)?

Merci d'etre si patient.

Pierre
Avatar
AV
Si tu metttais ton exemple (allégé) sur
http://cjoint.com
ça gagnerait du temps...

AV
Avatar
Pierre.M
http://cjoint.com/?lkrdpXE7zZ

En voila un modele on ne peut plus simplifie.
Merci toujours.

Pierre



On 2006-11-10 16:16:26 +0100, "AV" said:

Si tu metttais ton exemple (allégé) sur
http://cjoint.com
ça gagnerait du temps...

AV


Avatar
AV
C'est évidemment pas tout à fait la question initiale...
Supprime l'évènement Worksheet_Change de la feuille et copie/colle ça :

Private Sub Worksheet_Calculate()
With Me.ComboBox1
.ListFillRange = [A1].Address
.ListIndex = 0
End With
End Sub

AV
Avatar
Pierre.M
Super, la voila ma solution. Je vais pouvoir finir.
Merci beaucoup et mes excuses pour ne pas avoir su me faire comprendre mieux.
Bon weekend a toi.

Pierre
1 2