Pb ComboBox Excel 2000

bonjour,

j'ai un petit souci avec une ComboBox sous Excel 2000.

J'ai créé une ComboBox avec le nom ComboBox1

Quand je veux ajouter

La commande ActiveSheet.Shapes("ComboBox1").Select fonctionne correctement.

Par contre la commande ComboBox1.AddItem "toto" renvoie l'erreur suivante :

Erreur d'execution '424' :

Objet requis

J'ai vérifié dans Outils/Références que Microsoft Office 9.0 Object Library est bien coché

Auriez-vous (sûrement ) des idées ??

merci

jlr

Bonjour

Situes (ou lies) le combobox

Feuil1.ComboBox1.AddItem "toto"

ou

ActiveSheet.ComboBox1.AddItem "toto"

Bonne journée

merci banzai64 pour ta réponse, mais ça ne fonctionne pas, j'ai toujours le même message d'erreur.

Il me semble que si Excel avait un problème pour trouver la ComboBox, il n'arriverait pas à exécuter la commande ActiveSheet.Shapes("ComboBox1").Select, non ?

J'ai mis en PJ le bout de code qui ne fonctionne pas ...

jlr

23test.zip (13.85 Ko)

Bonjour

Je confirme

Essayes

Sub MiseAJourListes()

  '// Mise à jour de la Combo Box
  'Sheets("commandes").Select
  'ActiveSheet.Shapes("ComboBox1").Select
  Feuil2.ComboBox1.AddItem "toto"

End Sub

Bonjour le fil,

idem chez moi

Sub MiseAJourListes()

'// Mise à jour de la Combo Box
Sheets("Commandes").Select
ActiveSheet.Shapes("ComboBox1").Select
Worksheets("Commandes").ComboBox1.AddItem "toto"
Worksheets("Commandes").ComboBox1.AddItem "tata"

End Sub

Ce code marche bien, par contre attention dans ton fichier ton Onglet s'appelle Commandes et dans ton bout de code tu avais Sheets("commandes").Select , ce genre d'erreur d'inattention entraîne souvent des problèmes

Zirak a écrit :

Bonjour le fil,

idem chez moi

Cool !!

Ca marche

merci beaucoup !

Zirak a écrit :

Ce code marche bien, par contre attention dans ton fichier ton Onglet s'appelle Commandes et dans ton bout de code tu avais Sheets("commandes").Select , ce genre d'erreur d'inattention entraîne souvent des problèmes

Excel est sensible à la casse ?

jl

Rechercher des sujets similaires à "combobox 2000"