Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

bp msgbox

S

steve

Guest
Bonsoir a tous

le code ne fonctionne pas

Private Sub Worksheet_Change(ByVal Target As Range)

If Range("i6") > 170 Then MsgBox ("ATTENTION DEPASSEMENT " & vbCr & "" & vbCr & "QUANTITE LIMITE TOTAL" & vbCr & " " & vbCr & " Par surface",vbCritical)

End If

I6=ref cellule

merci d' avance
 
@

@+Thierry

Guest
Salut Steve,

Il semble que tu ne soies pas vraiment habitué des forum de discussion...

Pour ce problème de MsgBox tu as posté dans trois Fils de discussions différents :

11-01-03 18:06 "msgbox"
Jean Marie - StepLof et moi-même t'avons répondu....

11-01-03 18:14 "pb msgbox"
là c'est Ti qui s'y est collé...

11-01-03 23:05 "bp msgbox"
qui est donc ce fil ......

J'espère que le jour où tu auras un problème plus compliqué qu'un simple MsgBox... Tu vas pas nous refaire çà puissance 10 !!!...

Je ne sais pas si tu es le même Steve vu que tu es anonyme à chaque fois, mais ce n'est pas la première fois que je remarque de la "Steve-Anarchie" dans ce forum....

Voilà... Ci-joint une Démo de MsgBox spéciale pour Toi !

Bonne Journée
@+Thierry
 

Pièces jointes

  • MsgBox.xls
    20.5 KB · Affichages: 32
  • MsgBox.xls
    20.5 KB · Affichages: 29
  • MsgBox.xls
    20.5 KB · Affichages: 31

Discussions similaires

Réponses
1
Affichages
173
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…