!!! zonecombinées !!!

[Fabrice]

Bonjour le Forum

Je suis entrain de monter une page d'acceuil pour mon classeur. Je voudrai que l'utilisateur puisse choisir une marque de moto grace à une zone déroulante.
pour cela, g inséré une zonecombinée dans ma feuille et une image (qui sert à valider le choix de la zonecombinée et lancer la macro d'ouverture des feuilles correspondante).

le PB est comment prendre en compte les valeurs de la zonecombinée???

en effet, g tapé le code suivant pour effectuer un test:
Sub Image2_QuandClic()
If Zonecombinée5.Value = "HONDA" Then
MsgBox "OK"
End If
End Sub

il me met le msg d'erreur suivant: "objet requis"

est ce que quelqu'un aurait une solution?
merci de vos réponse,

FAb

 

[Michel_M]

bonjour Fabrice et le forum,

Essaies de mettre la ref de feuille avant zone combinée

par exemple',

Sheets(1).zonecombinée5 etc

A+
Michel

 

[Fabrice]

Salut Michel_M

Merci de ta proposition mais ca ne fonctionne pas! g meme essayé avec 1 ".value", mais sans succes!

Est ce qu'il y aurait d'autres solutions???

merci de vos réponses,
FAb

 

[Claudio54]

Salut fabrice et le forum

as-tu essayé .Text à tout hasard ?

 

[Fabrice]

salut Claudio54

Bien tenté mais ca ne fonctionne pas non plus!!!

J'ai comme l'impression que ce post va durer un ptit moment ;=)

Autre solution??? ;=)

Merci,
FAb

 

[Michel_M]

Bonjour,

Qu'appelles tu une zone combinée?

A+
Michel

 

[michel]

bonjour Fabrice , Michel et Claudio

sauf erreur de ma part la "zone combinée" est le nom des ComboBox dans la barre d'outils formulaires ( aussi appelé Drop Down )


Sub ComboboxFormulaire()
If ActiveSheet.Shapes("Zone combinée 5").ControlFormat. _
List(ActiveSheet.Shapes("Zone combinée 5").ControlFormat.ListIndex) = "HONDA" Then MsgBox "ok"
End Sub


bonne soiree
MichelXld

 

[Fabrice]

bonjour!

Merci Michel pour ce code VB!!!
ca va m'eviter de créer un UF!

Merci de votre aide,
FAb