Forums Neueste Beiträge
 

Summe als Vergleichswert in VBA errechnen - Wie?

16/09/2010 - 09:17 von Walter Heying | Report spam
Hallo,

ich benötige die Formel, wie ich eine Summe eines Tabellenbereiches
errechne. Dann werden anschließend, je nach Höhe, verschiedene
Maßnahmen mittels VBA durchgeführt. Zur besseren Erlàuterung: Ich
möchte, je nach Umsatzhöhe verschiedene Maßnahmen durchführen. So
könnte es sein, dass bei einem Umsatz bis 100.000 € der Vertreter
angeschrieben wird, um ihn darauf hinzuweisen. Sollte der Umsatz
größer als 1 Mio.€ sein, dann könnte eine Maßnahme sein, dass der
Verkaufsleiter automatisch informiert wird.

Wer kann mir also die Errechnung einer Summe eines bestimmten
Tabellenbereiches nennen?

Gruß
Walter
 

Lesen sie die antworten

#1 Peter Schleif
16/09/2010 - 12:26 | Warnen spam
Walter Heying schrieb am 16.09.2010 09:17 Uhr:

Wer kann mir also die Errechnung einer Summe eines bestimmten
Tabellenbereiches nennen?



Sub SummeAlsVergleichswertInVBA()
Select Case WorksheetFunction.Sum([A1:A10])
Case Is < 100000: MsgBox "kleiner 100.000"
Case Is < 1000000: MsgBox "kleiner 1.000.000"
Case Else: MsgBox "größer gleich 1.000.000"
End Select
End Sub

Peter

Ähnliche fragen