refEdit dans un Userform showModal = false

Bonjour tout le monde!
Je suis sur Excel 2003 et je souhaiterais mettre plusieurs refEdit dans un userform. Je vais vous expliquer le probleme.

J'ai un fichier TS.xls oú est le userForm avec les refEdit. J'ai un fichier AT.xls avec les données. Je souhaiterais dans TS.xls faire des liens vers certaine cellules de AT.xls. Mais pour savoir vers quel cellules faire ces liens, je souhaite utiliser plusieur refEdit. Le probleme, c'est que des que le showModal du userForm est sur false, plus rien ne fonctionne.... je suis obligé de planter Excel avec le gestionnaires des taches. Or je suis obligé de mettre showModal á false si je veux pouvoir passer á l'autre fichier. Je voulais savoir s'il existe une solution ou si c'est un probleme de VBA ?

J'ai vu qu'on pouvait faire la meme chose avec un inputBox. Mais cette solution n'est pas satisfaisante dans mon cas vu que je souhaite avoir plusieur refEdit sur un UserForm. Et il est impossible d'avoir plusieurs InputBox... enfin je crois.


Je ne sais pas si j'ai été tres clair...
Merci á ceux qui pourront m'aider :yaisse2:

Aprés moult recherche, il semblerais que depuis la version 2000 d'Excel, il est devenu un impossible d'utiliser refEdit pour lier avec un autre classeur. J'ai trouvé une solution ici : http://www.tushar-mehta.com/publish_...rinterface.htm

Il s'agit de créer une nouvelle classe qui permet ensuite de considérer des textBox comme des refEdit. C'est pas l'idéal mais je pense que c'est ce qu'il y a de mieux :king:

Citation:

---

Et il est impossible d'avoir plusieurs InputBox... enfin je crois.

---

Tu as essayé ?

Salut ouskel'n'or!

Ben en fait, je ne vois pas du tout comment je pourrais faire pour avoir dans une fenetre inputBox plusieurs champs... Tu as une idée ?

J'ai qutre chose avec Inputbox et un commandbutton (ShowModal = false)

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub CommandButton1_Click() Workbooks("Creances(2).xls").Activate Worksheets("feuil1").Select UserForm1.Hide Set Result = Application.InputBox("Sélectionner les cellules", "Sélection", Type:=8) MsgBox Result.Address Workbooks("Creances.xls").Activate Worksheets("feuil1").Select UserForm1.Show End Sub

---

Q+

Je reponds a ton dernier message : Appuie sur ctrl pour selectionner plusieurs plages ;)

j ai fait une fausse manip, je suis passe en clavier QUERTY, tu sais comment on fait pour retrouver le clavier AZERTY ? (Avec les touches de fonction) :cry:

Ouais j'avais vu ce bout de code dans un autre topic. Le probleme, c'est que je dois pouvoir sélectionner des cellules dans différents onglets. Et avec cette méthode, ce n'est pas trop possible (Enfin j'ai essayé et je n'ai pas réussi). Mais sinon ca aurait été sympa!

Merci quand meme ;)

edit: Ah non, j'avais déja eu le souci mais je ne me souviens plus.... peut etre ctrl+tab ? (pour repasser en AZERTY)

Non, pas de pb, avec ctrl que tu tiens appuye, jai teste c'est ok.
Bye