WorksheetFunktion.Sum auf Range beschränken.
08.02.2009 20:12:00
Chris
Hallo
Der untere Code läuft soweit perfekt, wären nicht noch andere Eingabefelder in der Umbgebung.
Sobald ich in eine Andere Zelle gehen als die von den Range A2:A30 und A50:A80 kommt auch dann
die Meldung. Ich glaube das hängt mit dem Sheet zusammen.
Kann man die WorksheetFunction.Sum auf die Felder A2:A30 und A50:A80 beschränken?
If WorksheetFunction.Sum(Range("A2:A30"), Range("A50:A80")) > Range("B1") Then
MsgBox "Wert ist überschritten"
End If
Gruß
Chris