Microsoft Excel 2007 Vba

Résolu
CrazySoprano -  
 CrazySoprano -
Salut le Forum, j'ai un code qui fonctionne parfaitement quand je me trouve dans le classeur . Mais une fois que je ferme excel et que j'ouvre le fichier le code est toujours présent mais ne s'exécute pas. Voila le code et le Fichier : 


Private Sub Worksheet_Change(ByVal Target As Range)  
     
      If Range("G" & Target.Row) = 0 Then MsgBox "Le stock est nul", vbCritical, "ATTENTION"
      If Range("G" & Target.Row) < 0 Then MsgBox "Le stock est négatif", vbCritical, "ATTENTION"
      Beep
      Beep
    End Sub


Help me please
A voir également:

4 réponses

Réponse 1 / 4
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
Ton code aurais déjà meilleur allure comme... 
Private Sub Worksheet_Change(ByVal Target As Range)  
    If Range("G" & Target.Row) = 0 Then  
        MsgBox "Le stock est nul", vbCritical, "ATTENTION"  
        Beep  
    ElseIf Range("G" & Target.Row) < 0 Then  
        MsgBox "Le stock est négatif", vbCritical, "ATTENTION"  
        Beep  
    End If  
End Sub

Et je ne vois pas pourquoi ça ne fonctionnerais plus ?
Voir s'il n'y a pas du code dans WorkBook_Open ?
Dans quel module est ce code ?
Tu a sauvé le classeur en mode pour macro ? Classeur.xlsm (et pas xlsx)
Tu dis.
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.
0
Réponse 2 / 4
CrazySoprano
 
Ouais en xlsm. Mais a chaque fois a l'ouverture du fichier on me demande si je veux activer les macro. Comment faire pour qu'on me demande plus cela mais que mes macros soit activés a chaque démarrage.
0
Réponse 3 / 4
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Ouais... et ta politesse.. elle est restée où ?
Elle pourrait peut-être venir en chantant !!
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.
0
Réponse 4 / 4
CrazySoprano
 
Desolé L'ami. Excuse moi encore. Problème résolu!!!
0