Discussion :

[damsmut]

Bonjour,

Voilà mon souci :

A partir d'une autre application je pilote Excel et souhaite afficher un message dans Excel...

Code :

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

1
2
Dim xlApp As Excel.Application
XlApp.MsgBox "Coucou"

Mais cela ne marche pas
Et pourtant avec "inputbox" ça marche



Quelqu'un peut-il m'aider ?


Merci

A+
Dams'

[Pierre Fauconnier]

Salut.

Tu as deux inputbox à ta disposition, celui de VBA et celui de l'objet Application (Excel) qui permet notamment de sélectionner des plages de cellules.

Par contre, l'objet Application n'expose pas de méthode MsgBox, donc, tu ne peux pas l'utiliser.

Tu dois utiliser l'instruction qui fait apparaître un message dans ton langage de programmation.

Peux-tu nous en dire plus sur le contexte, et notamment le langage utilisé?

[damsmut]

VBA, de Outlook vers Excel tout simplement

[Pierre Fauconnier]

Alors, utilise simplement un msgbox de vba

[damsmut]

oui, mais il faut qu'elle s'affiche dans Excel, et pas dans outlook...
sinon on ne la voit pas... de plus je souhaite garder Excel en arrière plan.

[Pierre Fauconnier]

Si tu gardes Excel en arrière-plan, comment veux-tu qu'un msgbox s'affiche dans Excel?

Pourrais-tu préciser ton objectif?

[damsmut]

je reformule : Excel en arrière plan de la msgbox... quand la msgbox s'affiche, on doit voir la fenêtre Excel derrière...

--> je ne veux pas la msgbox avec outlook derrière

[mercatog]

Code :

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

1
2
xlApp.Activate
MsgBox "kuku"

xlApp devrait être visible au préalable

Code :

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

xlApp.Visible=True

[damsmut]

non ça ne marche pas

[Arkham46]

bjr,

a tester en excutant une function de macro :

Code :

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

xlApp.ExecuteExcel4Macro "alert(""Coucou"")"

[damsmut]

super ça marche !

et est-ce qu'on peut mettre l'icône exclamation ?

merci