msg box

Hvis A¤ er afhængig af indtastning i A1 til A3 kan denne makro gøre det:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A3")) Is Nothing Then
If Cells(4, 1) < 0 Then
MsgBox ("Køb ikke muligt - saldo går i minus")
End If
End If
End Sub

Ja der skulle have stået A4 i stedet for A¤

Hej Jens

Kan du forklare hvor / hvordan jeg indsætter makroen

Jesper

Højreklik på Fanebladet, vælg vis koder og indsæt den der

Fantastisk - den bruger jeg
skriv et svar og du få velfortjente point:-)

Et svar