Se connecter avec
S'enregistrer | Connectez-vous

VBA Excel Erreur 50290 causée par le clic gauche de la souris

Dernière réponse : dans Programmation
Partagez

Comment as-tu fais ton compteur ?

Il faut savoir que le VBA s'arrête lors de l'édition d'une cellule, provoquant parfois des erreurs d'execution

Code du compteur :

  1. Sub TimerOn(Interval As Long)
  2. TimerID = SetTimer(0, 0, Interval, AddressOf Chrono)
  3. End Sub
  4.  
  5. Sub Chrono()
  6. Dim DS
  7.  
  8. If (DS Mod 100) = 0 Then
  9. Feuil1.compteur = Feuil1.compteur + 1
  10. Feuil1.Range("C11") = Feuil1.compteur
  11. End If
  12.  
  13. End Sub


Dans le selection_change, je n'ai rien du tout.
  • zeb a édité ce message

Moderator dixit : change tes balises [quote] par [code=vb] dans ton message précédent. Merci.

Edit: Je l'ai fait pour toi. Fais-le de toi même la prochaine fois ;) 
  • zeb a édité ce message
  • zeb a édité ce message
Posez votre question