Votre question

Erreur 13 de compilation VBA EXECEL 2007

Tags :
  • Programmation
Dernière réponse : dans Programmation
19 Mars 2011 10:34:00

Bonjour
j'ai essayé de faire l'exécution de mon macro VBA ,mais un erreur apparait '' erreur 13 de compilation ".
voila mon macro :
  1. Private Declare Function Beep Lib "Kernel32" (ByVal Fq As Long, ByVal Tm As Long) As Long
  2. Sub BeepBeep()
  3. Beep 392, 200
  4. Beep 494, 100
  5. Beep 588, 200
  6. Beep 740, 100
  7. Beep 880, 400
  8. Beep 740, 100
  9. Beep 880, 900
  10. End Sub
  11.  
  12. Private Sub Worksheet_Calculate()
  13. If Range("H07").Value > 60 Then
  14. Call BeepBeep
  15. MsgBox " TR1: Attention valeur atteinte"
  16. End If
  17. If Range("H09").Value > 50 Then
  18. Call BeepBeep
  19. MsgBox " Valeur seuil atteint "
  20. End If
  21. End Sub


merci pour votre aide je suis vraiment bloqué :) 






Autres pages sur : erreur compilation vba execel 2007

a c 232 L Programmation
19 Mars 2011 14:54:29

Salut,

Et il ne te dit pas où est l'erreur dans ton code ?
m
0
l
Tom's guide dans le monde
  • Allemagne
  • Italie
  • Irlande
  • Royaume Uni
  • Etats Unis
Suivre Tom's Guide
Inscrivez-vous à la Newsletter
  • ajouter à twitter
  • ajouter à facebook
  • ajouter un flux RSS