Sujet Précédent Sujet Suivant

Un petit code VBA pour effacer une MSGBOX

Fermé
vieuxray - 31 mars 2022 à 18:44
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 - 1 avril 2022 à 18:50
Bonsoir a tous et toutes, forum bonsoir

Je cherche un petit code VBA qui effacerai l'affichage d'une boite msgbox.

Ex: j'affiche un message dans une msgbox et je souhaiterai fermer automatiquement pour sortir de cette boite au bout de quelques secondes et continuer le programme mais pas de UserForm

Merci pour votre aide, bonne soirée a vous et merci pour votre aide.
Cdlt Ray



<config>Windows10 / Edge 99.0.1150.55</Excel 2007>
A voir également:

8 réponses

Réponse 1 / 8
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
31 mars 2022 à 18:57
Bonjour,

Voir ceci


https://excel-malin.com/codes-sources-vba/msgbox-qui-se-ferme-automatiquement/

1
Réponse 2 / 8
vieuxray
31 mars 2022 à 19:39
Salut cs_le pivert

Merci de ta réponse,

J'ai déja essayer avec le lien que tu proposes mais ce n'ai pas fiable des secondes a rallonge et tous autres soucis ca plante mème Excel alors non

Je pensais faire afficher une forme avec un message puis utiliser ce code qui fonctionne très bien, qui au bout du temps imposer efface automatiquement la forme et on continue le programme.

Application.Wait (Now + TimeValue("0:00:01"))

Je retrouve plus un exemple sur le net mais il a disparu sans doute

voila si tu a une idée sur le sujet ca sera surement bon pour moi

Merci de ton aide passe un bonne soirée

Cdlt Ray
1
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
1 avril 2022 à 08:34
Voir cette discussion:

https://forums.commentcamarche.net/forum/affich-30832529-message-msgbox-temporaire-ne-fonctionne-pas#3

@+
1
vieuxray > cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024
1 avril 2022 à 09:25
Salut cs_Le Pivert,

Merci pour ta réponse,

Je voulais éviter les userforms en mettant une forme
c'est sur que c'est mieux pour l'habillage couleur etc etc etc

--- je vais voir ce qu'il reste possible de faire facilement.

Sinon pour les mgsboxs il faut coché

"Microsoft Scripting Runtime"
dans les références du module VBA? moi cela fonctionne maintenant mais comme je t'ai dit ce n'ai pas fiable

Bonne journée a toi et merci

Cdlt Ray
1
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728 > vieuxray
1 avril 2022 à 11:08
Tu peux t'inspirer de ce programme qui affiche un message à l'ouverture:

https://codes-sources.commentcamarche.net/source/49994-xldeprotegevba

@+
1
Réponse 3 / 8
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 1 705
1 avril 2022 à 11:23
Bonjour a vous deux,

VieuxRay:
Pendant l'affichage de la forme, le programme doit continuer a s'executer ou pas?
1
Réponse 4 / 8
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 1 705
1 avril 2022 à 12:04
Re,

la forme devient non visible quand la cellule A1 n'est plus vide
Donc il n'y a pas de notion de temps.
Sub test()
ActiveSheet.Shapes("Rectangle 1").Visible = True
Do While Range("A1") = ""
DoEvents
Loop
ActiveSheet.Shapes("Rectangle 1").Visible = False
End Sub
1

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 8
vieuxray
1 avril 2022 à 16:19
Salut f894009,

Merci pour ta réponse,
je n'avais pas penser a faire comme tu la fait dans ton code.

Je dois contrôler plusieurs lignes A2,A8,A14,A22,A28,A34,F2,F8,F14,F22,F28,F34 comment faire
et peut t'on utiliser ou incorporer dans le code afin d'éviter de faire appel a ta macro (Sans Sub)

Merci pour ton aide, bonne après midi.

Cdlt Ray
1
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 1 705
1 avril 2022 à 17:16
Re,
A quoi ressemble votre code que je puisse vous donner une reponse adéquate
1
Réponse 6 / 8
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 1 705
1 avril 2022 à 18:44
Re,

Je recupere le fichier et regarde la chose demain matin si personne prend le relais
1
f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 1 705
1 avril 2022 à 18:50
Suite:
Je dois contrôler plusieurs lignes A2,A8,A14,A22,A28,A34,F2,F8,F14,F22,F28,F34 comment faire
De quelle feuille car aucunes ne correspondent a une saisie
1
Réponse 7 / 8
vieuxray
1 avril 2022 à 11:41
Salut f894009,

Merci de ta réponse,

Pour le programme NON pas besoin qu'il tourne.

En fait j'entre des données prise sur mon cardiomètre puis je place les données dans le tableau

Mais pour éviter des erreurs de manipulation, je voulais mettre des messages qui restent afficher un temps de quelques secondes, puis s'efface tout seul.
Sans entrer dans un code laborieux, au plus court c'est bien Lol

Merci pour ton aide, une bonne journée a toi
Cdlt Ray
0
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
1 avril 2022 à 11:54
Va au plus simple pour faire cela:

http://cooking-excel.com/2013/02/afficher-un-commentaire-en-passant-la-souris-au-dessus-dune-cellule/

@+
1
Réponse 8 / 8
vieuxray
1 avril 2022 à 17:38
Salut f894009,

Voila le fichier en cours lien par (cjoint)

https://www.cjoint.com/c/LDbpKaj2P3G

Cdlt Ray
0

Discussions similaires

comment écrire des petits chiffres ?
Elisa-x3 -
Luka_65 -

9 réponses
Code de renvoi d'appel : Ooredo, Mobilis...
midoou07 -
Camille -

13 réponses
Codes bateaux et avion GTA vice city Stories
matt3610 -
Diglo -

30 réponses