dimanche 29 mars 2015
msgbox na 1 keer stoppen
Posted on 07:01 by Unknown
Hoi, ben ik weer. Er zit hopelijk geen limiet aan de vragen die je stelt :4:
Ik wil graag als er een bestelling wordt gedaan de volgende msgbox geven.
Als ik dit invoer gaat het prima, maar de doelcel is een totaal. En elke keer dat ze iets invoeren (dat is 7 keer in een bestelling) krijg ik dus die msgbox.
Is er een manier om zodra er 1 dag is besteld er een msgbox komt maar daarna niet meer?
Ik kan niet van 1 van de besteldagen een doelcel maken want ik weet niet welke dagen ze wel of niet bestellen. En dus moet het totaal als doelcel gebruikt worden...
toch?
Ik wil graag als er een bestelling wordt gedaan de volgende msgbox geven.
Als ik dit invoer gaat het prima, maar de doelcel is een totaal. En elke keer dat ze iets invoeren (dat is 7 keer in een bestelling) krijg ik dus die msgbox.
Is er een manier om zodra er 1 dag is besteld er een msgbox komt maar daarna niet meer?
Ik kan niet van 1 van de besteldagen een doelcel maken want ik weet niet welke dagen ze wel of niet bestellen. En dus moet het totaal als doelcel gebruikt worden...
toch?
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Static bestelling
If Not Fix(Range("$k$18").Value) = Fix(bestelling) Then
pt = MsgBox("LET OP! Foccacia's worden met het Café meegeleverd", vbinformation, "Bestellen Foccacia's")
End If
bestelling = Range("$k$18").Value
End Submsgbox na 1 keer stoppen
Categories: msgbox na 1 keer stoppen
Inscription à :
Publier les commentaires (Atom)
0 commentaires:
Enregistrer un commentaire