InputBox qui ne s'affiche pas - Erreur 2015

[dionys0s]

Hello le forum

j'ai un petit soucis avec une macro :

j'ai créé une fonction générique qui permet de sélectionner un élément (elle s'appelle SelectElement) d'une variable tableau en 1 dimension.
Dans le classeur en PJ, je fais un premier choix (parmi 5 classifications), et en fonction du premier choix, il y a un deuxième choix à effectuer.

Lorsque je choisis l'une des 4 premières classifications, tout se passe bien, et ma fonction se comporte comme il faut.
Mais lorsque je choisis la 5ème classification, la fonction générique plante, sans que je comprenne pourquoi : tout s'initialise comme il faut, mais au moment où le code doit traiter la ligne

SelectElement = Application.InputBox(Prompt, Title)

(les variables "Prompt" et "Title" ayant été affectées lors de l'initialisation), l'exécution "glisse" sur cette ligne, sans afficher l'InputBox, et ma fonction récupère "Erreur 2015", et plante au moment de tester la validité de la variable récupérée par ce qui aurait dû être tapé par l'utilisateur.

Est-ce que sur votre ordinateur le code se comporte comme chez moi ? Si oui, quelqu'un aurait-il une idée du pourquoi du comment ? Ca fait un bout de temps que je me triture les méninges sur ce truc, et je ne comprends vraiment pas pourquoi ça fait ça...

D'avance merci pour votre aide

dionys0s

 

[Efgé]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Bonjour dionys0s

Je ne pourrai pas t'aider, sous 2003 pas de plantage

Cordialement

 

[gilbert_RGI]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Bonjour

nombre d'arguments trop important

EFFECTIFS = Array(2, 3, 4, 4, 11)

11 est le maximum supporté

 

[dionys0s]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Bonjour Gilbert

c'est une constante "connue", ou issue de tests que tu viens de faire ? Je demande parce que j'ai utilisé ce code dans un classeur où il fonctionne pour la sélection d'un élément parmi 21 (donc ma variable Prompt contient 22 lignes qui s'affichent toutes correctement).

 

[gilbert_RGI]

Re : InputBox qui ne s'affiche pas - Erreur 2015

teste toi même pour voir
chez moi ça bloque sur 12
peut être la capacité de l'inputbox en nb de caractères ?

 

[dionys0s]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Saleté... ça doit être le nombre de caractères max de la variable prompt...
J'ai enlevé tous les "noms de famille" de la 5ème classification, et il ne plante pas...

 

[gilbert_RGI]

Re : InputBox qui ne s'affiche pas - Erreur 2015

oui c'est ce que j'avais observé !

d'où ma conclusion, mais rien trouvé dans l'aide en limitation

 

[dionys0s]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Bon bah il ne me reste plus qu'à gérer ça avec un UserForm créé à la volée...

 

[gilbert_RGI]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Ce qui me pose problème c'est que l'Ami Efgé n'ait pas cette limitation apparement

est-ce que la version d'Excel serait en cause

 

[dionys0s]

Re : InputBox qui ne s'affiche pas - Erreur 2015

C'est la piste la plus vraisemblable...

 

[Efgé]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Re
Bonjour gibert_RGI
Je confirme:

et

Cordialement

 

[gilbert_RGI]

Re : InputBox qui ne s'affiche pas - Erreur 2015

solution peut-être ça fonctionne chez moi en tout cas

au lieu de application.inputbox mettre inputbox

dites moi

 

[dionys0s]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Re,

Euh Efgé, comment se fait-il que la classification 5 n'apparaisse pas dans le premier InputBox ??

 

[dionys0s]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Oui, j'avais déjà vu que ça marchait sans Application, mais j'ai besoin de Application pour traiter l'annulation

if VarType(SelectElement) = vbBoolean then End

Je ne sais pas faire autrement...

 

[gilbert_RGI]

Re : InputBox qui ne s'affiche pas - Erreur 2015

Re
Bonjour gibert_RGI
Je confirme:

et

Cordialement

je ne mets pas en doute ton test Efgé

ce que je vois c'est que tu n'as pas la classification 5 dans tes boites et c'est là le blème

j'ai lu sur le web que l'application.inputbox était limitée à 255 caractères

et en essayant inputbox seul je ne trouve plus l'erreur