VBA : ScreenUpdating + bouton shape
Résolu/Fermé
tchitchy
Messages postés
42
Date d'inscription
mercredi 28 avril 2010
Statut
Membre
Dernière intervention
22 avril 2022
-
17 déc. 2013 à 11:33
tchitchy Messages postés 42 Date d'inscription mercredi 28 avril 2010 Statut Membre Dernière intervention 22 avril 2022 - 20 déc. 2013 à 10:01
tchitchy Messages postés 42 Date d'inscription mercredi 28 avril 2010 Statut Membre Dernière intervention 22 avril 2022 - 20 déc. 2013 à 10:01
A voir également:
- Vba doevents screenupdating
- Mkdir vba ✓ - Forum VB / VBA
- Vba récupérer valeur cellule ✓ - Forum VB / VBA
- Excel compter cellule couleur sans vba - Guide
- Vba range avec variable ✓ - Forum VB / VBA
- Autofill vba ✓ - Forum Excel
3 réponses
Mytå
Messages postés
2973
Date d'inscription
mardi 20 janvier 2009
Statut
Contributeur
Dernière intervention
20 décembre 2016
950
17 déc. 2013 à 12:28
17 déc. 2013 à 12:28
Salut le Forum
Essaye en insérant un DoEvents
Mytå
Essaye en insérant un DoEvents
Sheets("Form1").Shapes("Wait").Visible = True
DoEvents
Application.ScreenUpdating = False
Mytå
tchitchy
Messages postés
42
Date d'inscription
mercredi 28 avril 2010
Statut
Membre
Dernière intervention
22 avril 2022
2
17 déc. 2013 à 12:34
17 déc. 2013 à 12:34
Salut et merci de ta reponse. Seulement j'ai toujours le meme soucis.
Quand je mets la ligne "Application.ScreenUpdating = False" en commentaire le bouton apparait et des que je l'active a nouveau le bouton n'est plus visible.
Quand je mets la ligne "Application.ScreenUpdating = False" en commentaire le bouton apparait et des que je l'active a nouveau le bouton n'est plus visible.
tchitchy
Messages postés
42
Date d'inscription
mercredi 28 avril 2010
Statut
Membre
Dernière intervention
22 avril 2022
2
17 déc. 2013 à 12:40
17 déc. 2013 à 12:40
Je viens re repondre a ta reponse Myta. Ca fonctionne en fait en inserant le DoEvents. C'est juste que ma macro s'executait trop vite pour qu'il apparaisse.
Je te remercie enormement je vais voir exactement ce a quoi correspond ce fameux "DoEvents".
Merci encore
Je te remercie enormement je vais voir exactement ce a quoi correspond ce fameux "DoEvents".
Merci encore
tchitchy
Messages postés
42
Date d'inscription
mercredi 28 avril 2010
Statut
Membre
Dernière intervention
22 avril 2022
2
17 déc. 2013 à 13:05
17 déc. 2013 à 13:05
Encore une fois me revoila.
Alors effectivement le DoEvents fonctionne mais pas tout le temps. Je m'explique :
Lorsque je suis sur VBA et que j'appuie sur F5 alors la ca fonctionne correctement.
Seulement, quand je suis dans mon tableur et que j'appuie sur mon bouton la ca ne fonctionne pas. J'ai toujours le meme probleme.
Desole de ces messages a repetition...
Alors effectivement le DoEvents fonctionne mais pas tout le temps. Je m'explique :
Lorsque je suis sur VBA et que j'appuie sur F5 alors la ca fonctionne correctement.
Seulement, quand je suis dans mon tableur et que j'appuie sur mon bouton la ca ne fonctionne pas. J'ai toujours le meme probleme.
Desole de ces messages a repetition...
Mytå
Messages postés
2973
Date d'inscription
mardi 20 janvier 2009
Statut
Contributeur
Dernière intervention
20 décembre 2016
950
Modifié par Mytå le 17/12/2013 à 23:33
Modifié par Mytå le 17/12/2013 à 23:33
Re le Forum
Rajoute un délai d'une seconde avant le DoEvents
Rajoute un délai d'une seconde avant le DoEvents
Application.Wait Time + TimeSerial(0, 0, 1)Mytå
tchitchy
Messages postés
42
Date d'inscription
mercredi 28 avril 2010
Statut
Membre
Dernière intervention
22 avril 2022
2
20 déc. 2013 à 10:01
20 déc. 2013 à 10:01
Coucou Mytå,
Desole de la reponse tardive mais je ne travaille qu'a mi-temps pour cette boite.
J'ai essaye ta solution et effectivement probleme resolu. Ca fonctionne parfaitement je t'en remercie.
Bonne continuation a toi l'ami.
Je place le sujet en resolu
Desole de la reponse tardive mais je ne travaille qu'a mi-temps pour cette boite.
J'ai essaye ta solution et effectivement probleme resolu. Ca fonctionne parfaitement je t'en remercie.
Bonne continuation a toi l'ami.
Je place le sujet en resolu