XL 2010 arréter éxécution code vba puis reprendre

jad73

XLDnaute Occasionnel
Bonjour le forum
J'ai un code vba que je voudrais faire arréter (20 s)le temps d'entrer des données puis le faire reprendre.
Quelle instruction mettre.
merci
 

jad73

XLDnaute Occasionnel
Bonjour kingfadhel, le forum

Merci pour ta réponse, j'ai mal précisé ma question le code s'arrete bien mais je ne peux rien inscrire, il y a le petit sablier présent de plus j'ai fait une macro "Ajout" qui sera plus rapide pour inscrire les données que par copier/coller, serait-il possible de l'inserer dans le code aprés l'arret.
merci
 

Dranreb

XLDnaute Barbatruc
Bonjour.
Vous pouvez mettre une instruction DoEvents dans la boucle principale de votre macro pour qu'elle n'empêche pas les saisies. Mais avez vous fait tout ce qu'il faut pour qu'elle soit le plus rapide possible ? (C'est à dire dans l'idéal qu'elle n'accède pas du tout aux cellules pendant qu'elle tourne, juste au début pour garnir des valeurs d'une plage un tableau VBA sur lequel elle travaillera exclusivement, et à la fin pour en vider le contenu dans une plage)
 

youky(BJ)

XLDnaute Barbatruc
Bonjour tous,
Avec la méthode OnTime c'est simple
Voici un exemple à mettre dans le module
Public fin As Boolean est à mettre en tête du module
Bruno
VB:
Public fin As Boolean
Sub my_Procedure()
If Not fin Then
'1er code
MsgBox "Premier code"
fin = True
Application.OnTime Now + TimeValue("00:00:20"), "my_Procedure"
Else
'2ème code
fin = False
MsgBox "deuxième code"
End If
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
311 715
Messages
2 081 822
Membres
101 822
dernier inscrit
holale