OVH Cloud OVH Cloud

msgbox continuer programme

5 réponses
Avatar
Lepaic07
j'ai une macro qui tourne...
jusque là tout va bien, seulement j'ai oublier comment permettre l'affichage
d'une msgbox avec bouton OK sans mettre en pause le programme.
Je m'explique:
-La MsgBox s'affiche avec un bouton OK.
-Meme si l'utilisateur ne click pas sur OK, je veut que la MsgBox reste
afficher et que le programme tourne en arrière plan.
-A la fin du programme, la MsgBox disparait seule (cette partie peut etre
facultative!)
Merci d'avance pour vos précieux renseignements!

5 réponses

Avatar
michdenis
Bonjour Lepaic07,

Utilise un formulaire (userform) que tu affiche dans
une fenêtre non modale en guise de boîte de message


Salutations!


"Lepaic07" a écrit dans le message de news:

j'ai une macro qui tourne...
jusque là tout va bien, seulement j'ai oublier comment permettre l'affichage
d'une msgbox avec bouton OK sans mettre en pause le programme.
Je m'explique:
-La MsgBox s'affiche avec un bouton OK.
-Meme si l'utilisateur ne click pas sur OK, je veut que la MsgBox reste
afficher et que le programme tourne en arrière plan.
-A la fin du programme, la MsgBox disparait seule (cette partie peut etre
facultative!)
Merci d'avance pour vos précieux renseignements!
Avatar
Pounet95
Bonjour,

AMHA, il ne faut pas utiliser l'instruction msgbox mais plutôt la simuler
avec un userform de ton crû qui pourrait y ressembler, non ?

Bonne journée
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Lepaic07" a écrit dans le message de
news:
j'ai une macro qui tourne...
jusque là tout va bien, seulement j'ai oublier comment permettre
l'affichage
d'une msgbox avec bouton OK sans mettre en pause le programme.
Je m'explique:
-La MsgBox s'affiche avec un bouton OK.
-Meme si l'utilisateur ne click pas sur OK, je veut que la MsgBox reste
afficher et que le programme tourne en arrière plan.
-A la fin du programme, la MsgBox disparait seule (cette partie peut etre
facultative!)
Merci d'avance pour vos précieux renseignements!


Avatar
Lepaic07
DSL!
Mais comment est ce que je peut intégrer ca dans dans ma macro? Je ne peut
que me servi d'un fichier!
C'est un classeur qui va etre utilisé en résau par d'autres personnes.
Merci de me donner les lignes de code.

Salutations


Bonjour Lepaic07,

Utilise un formulaire (userform) que tu affiche dans
une fenêtre non modale en guise de boîte de message


Salutations!


"Lepaic07" a écrit dans le message de news:

j'ai une macro qui tourne...
jusque là tout va bien, seulement j'ai oublier comment permettre l'affichage
d'une msgbox avec bouton OK sans mettre en pause le programme.
Je m'explique:
-La MsgBox s'affiche avec un bouton OK.
-Meme si l'utilisateur ne click pas sur OK, je veut que la MsgBox reste
afficher et que le programme tourne en arrière plan.
-A la fin du programme, la MsgBox disparait seule (cette partie peut etre
facultative!)
Merci d'avance pour vos précieux renseignements!





Avatar
michdenis
Bonjour Lepaic07,

Tu construite ton formulaire avec le minimum de bouton :
un "Label" pour afficher ton message.
un bouton de commande pour fermer ton formulaire

Dans ton code, à l'endroit désiré :
Userform1.show 0 'tu dois avoir excel 2000 ou plus récent
doevents

et si tu veux faire disparaître ton formulaire :
Unload Userform1

DAns le ThisWorkbook de ton classeur, tu dois utiliser
une procédure pour charger la référence :

Ce qui fonctionne bien, si tous les ordinateurs utilisent le
même système d'exploitation. dans ce cas, Windows Xp.

Mais le chemin du fichier n'est pas toujours au même endroit
si tu utilises Windows 98, windows Millenium ou Windows pro 200

Dans ces cas, tu devras ajouter un bout de code pour tester la version
de windows et indiquer le bon chemin du fichier FM20.DLL

Et oui, tout ça pour un message !!!

'------------------------
Private Sub Workbook_Open()
'On error resume next
ThisWorkbook.VBProject.References.AddFromFile ("C:WINDOWSsystem32FM20.DLL")

End Sub
'------------------------

Pour faire disparaître cette référence au besoin :

With ThisWorkbook.VBProject
Set Ref = .References("MsForms")
.References.Remove Ref
End With



Salutations!


"Lepaic07" a écrit dans le message de news:

DSL!
Mais comment est ce que je peut intégrer ca dans dans ma macro? Je ne peut
que me servi d'un fichier!
C'est un classeur qui va etre utilisé en résau par d'autres personnes.
Merci de me donner les lignes de code.

Salutations


Bonjour Lepaic07,

Utilise un formulaire (userform) que tu affiche dans
une fenêtre non modale en guise de boîte de message


Salutations!


"Lepaic07" a écrit dans le message de news:

j'ai une macro qui tourne...
jusque là tout va bien, seulement j'ai oublier comment permettre l'affichage
d'une msgbox avec bouton OK sans mettre en pause le programme.
Je m'explique:
-La MsgBox s'affiche avec un bouton OK.
-Meme si l'utilisateur ne click pas sur OK, je veut que la MsgBox reste
afficher et que le programme tourne en arrière plan.
-A la fin du programme, la MsgBox disparait seule (cette partie peut etre
facultative!)
Merci d'avance pour vos précieux renseignements!





Avatar
Lepaic07
Merci de ton aide!
Et oui comme tu dit tout ca pour un message!

@+


Bonjour Lepaic07,

Tu construite ton formulaire avec le minimum de bouton :
un "Label" pour afficher ton message.
un bouton de commande pour fermer ton formulaire

Dans ton code, à l'endroit désiré :
Userform1.show 0 'tu dois avoir excel 2000 ou plus récent
doevents

et si tu veux faire disparaître ton formulaire :
Unload Userform1

DAns le ThisWorkbook de ton classeur, tu dois utiliser
une procédure pour charger la référence :

Ce qui fonctionne bien, si tous les ordinateurs utilisent le
même système d'exploitation. dans ce cas, Windows Xp.

Mais le chemin du fichier n'est pas toujours au même endroit
si tu utilises Windows 98, windows Millenium ou Windows pro 200

Dans ces cas, tu devras ajouter un bout de code pour tester la version
de windows et indiquer le bon chemin du fichier FM20.DLL

Et oui, tout ça pour un message !!!

'------------------------
Private Sub Workbook_Open()
'On error resume next
ThisWorkbook.VBProject.References.AddFromFile ("C:WINDOWSsystem32FM20.DLL")

End Sub
'------------------------

Pour faire disparaître cette référence au besoin :

With ThisWorkbook.VBProject
Set Ref = .References("MsForms")
.References.Remove Ref
End With



Salutations!


"Lepaic07" a écrit dans le message de news:

DSL!
Mais comment est ce que je peut intégrer ca dans dans ma macro? Je ne peut
que me servi d'un fichier!
C'est un classeur qui va etre utilisé en résau par d'autres personnes.
Merci de me donner les lignes de code.

Salutations


Bonjour Lepaic07,

Utilise un formulaire (userform) que tu affiche dans
une fenêtre non modale en guise de boîte de message


Salutations!


"Lepaic07" a écrit dans le message de news:

j'ai une macro qui tourne...
jusque là tout va bien, seulement j'ai oublier comment permettre l'affichage
d'une msgbox avec bouton OK sans mettre en pause le programme.
Je m'explique:
-La MsgBox s'affiche avec un bouton OK.
-Meme si l'utilisateur ne click pas sur OK, je veut que la MsgBox reste
afficher et que le programme tourne en arrière plan.
-A la fin du programme, la MsgBox disparait seule (cette partie peut etre
facultative!)
Merci d'avance pour vos précieux renseignements!