Discussion :

[Charz]

Bonjour,
j'ai une demande toute simple: Quel est le code pour faire apparaître une fenêtre de sélection de plage telle que l'image jointe?

J'ai essayé hier le code fourni par SilkyRoad dans les FAQs et ça a très bien fonctionné la première fois:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub Test_V02()
    Dim Plage As Range   
    set Plage = Application.InputBox("Sélectionnez une plage de cellule", _
        "Le titre", , , , "C:\dossier\FichierAide.hlp", 100, Type:=8)
    MsgBox Plage.Address
End Sub

Maintenant, j'ignore pourquoi, la fenêtre me demandant la plage est devenue modale, c-à-d que mon curseur de souris est une flèche et que je suis incapable de sélectionner des cellules ou de faire défiler ma feuille tant que je n'ai pas fait disparaitre cette inputbox.

Je ne sais plus quoi essayer: inputbox, application.inputbox, userform: je me bute à des erreurs à chaque fois.
Merci d'avance pour l'aide.

[p0l1n]

jai essayer ton code et fonctionne nickel pour moi

[Charz]

et si tu cliques comme moi par erreur sur la flèche "sélectionner des objets" dans la barre de dessin et que tu réexécutes la macro quelques fois?...

Je te rappelle que ça a fonctionné 2 ou 3 fois au début pour moi aussi.
Je crois que ça a à voir avec un objet qui a été déclaré et non détruit en inetrrompant la macro ou quelque truc obscur du genre

PS: ce code n'était pas en sous-routine mais avait été inclus dans mon sub principal lorsqu'il a arrêté de fonctionner. Ça ne doit pas changer grand chose et de toute façon, ça ne fonctionne pas si je le met en sous routine et que je fais call test_v02()

[p0l1n]

c'est comme ca que je l'ai tester pour moi, jai placé ton code dans un module.

et avec un bouton je call test_v02

apres 2jours et plusieurs essais aucun problème pour moi, même que j'utilise ton code pour une de mes applications merci !

[Charz]

Je suis enchanté que ces lignes fonctionnent pour vous , mais je ne réussit toujours pas à m'expliquer pour quoi cette fenêtre est modale sur mon ordinateur...

J'ai alors essayé la même macro (contenant la sous routine test_V02) sur un autre ordinateur. Sans grande surprise, Test_V02 fonctionne, mais le reste de ma macro plante par la suite: sur cet ordinateur, je n'ai pas copié les fonctions excel personnelles nécessaires à l'exécution de ma macro principale.

Je copie donc les fichiers PERSONAL.xls et SNR.xla sur C:\Documents and Settings\username\Application Data\Microsoft\Excel\XLSTART, je ferme tous mes fichiers excel, puis je réessaie. Et maintenant, ce deuxième ordinateur aussi m'affiche la fenêtre de sélection de plage en modal: je ne peux pas sélectionner la plage avec la souris.

Comme mes fonctions personnelles sont essentielles à la macro, je devrai me résoudre à abandonner l'idée de sélection de plage à la souris. En tout cas, si quelqu'un a une autre idée, je serais ravi de l'entendre.

Merci