Discussion :

[meuah]

Bonjour,

Je souhaiterais placer dans une de mes macros Excel une boite message pour indiquer à l'utilisateur quelle cellule il doit sélectionner avant de continuer l'exécution de cette macro. Malheureusement, quand je mets une boite message, l'application est bloquée et il n'est pas possible de modifier la cellule sélectionnée.
Comment puis-je faire?
Merci d'avance ^^

[zazaraignée]

À la place d'une MsgBox, tu peux créer ton propre UserForm et l'afficher en mode "non-modal". Pour la sélection de cellule (ou de plage de cellules), tu peux ajouter sur ce UserForm un composant RefEdit que tu trouveras facilement en ajoutant des composants supplémentaires à la boîte d'outils. Dans la fenêtre VBA, après avoir créé un UserForm, tu choisis le menu Outils, puis l'option Contrôles supplémentaires. Coche ensuite la case du composant RefEdit.Ctrl. C'est, à quelques détails près, le même composant que l'on trouve dans les boîtes de dialogue d'assistant de formule de Excel, plus précisément la boîte de dialogue Arguments de fonction qui suit la boîte de dialogue Insérer une fonction.

[meuah]

et comment puis-je faire pour lancer ce userform à partir de ma macro? C'est la première fois que je fais ça en vba excel.

[meuah]

j'ai un autre problème, je n'arrive à cliquer sur le bouton "OK" que j'ai créé. Comment ça se fait?

[zazaraignée]

Lancer le UserForm (c'est disponible dans l'aide et abondamment traité sur ce forum)

Code :

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

UserForm1.Show

Impossible de cliquer sur le bouton que tu as créé...
Sa propriété Enabled est-elle à True ?
Y a-t-il du code de programmé sur l'événement Click de ce bouton ?

[zandru]

et comment puis-je faire pour lancer ce userform à partir de ma macro? C'est la première fois que je fais ça en vba excel.

plusieurs solution : soit un bouton sur ta feuille xls avec ce code derrière :

Code :

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

1
2
3
Private Sub CommandButton1_Click()
    userform.Show
End Sub

ou si tu veux que la userform se lance dès l'ouverture du classeur :

Code :

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

1
2
3
Private Sub Workbook_Open()
    userform.Show
End Sub

[meuah]

le "enabled" est bien à "true"; et j'ai du code derrière, pourtant lorsque je clique, je ne vois même pas le bouton s'enfoncer.
Dans le code, j'ai mis que je voulais cacher le user form (.hide)
Mais je ne sais pas si c'est ce qu'il convient de faire, car je voudrais la fermer afin que ma macro puisse poursuivre.
Et est-ce qu'une fois que le userform sera fermé ou caché, la case que j'ai sélectionné dedans restera la cellule active?

[meuah]

c bon, j'ai trouvé.
J'ai complètement recommencé mon bouton et ça a fonctionné. Et j'ai enlevé le ref.Edit de mon userform!
Voilà
Merci à tous