Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1636to1640
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Werte als Absoluter Werte in VBA Function addieren

Werte als Absoluter Werte in VBA Function addieren
08.08.2018 13:21:41
Burghard

Hallo, ich habe eine VBA Function, die auch richtig abläuft. Jetzt habe ich aber auch negative Werte in der Additionsspalte. Ich möchte gerne die Function als Addition von absoluten Zahlen haben wollen. Müsste also irgendwo "ABS" stehen.
Public Function ohne_strich(Bereich As Range)
Dim rngC As Range, dblZ As Double
Application.Volatile
For Each rngC In Bereich
If rngC.Font.Strikethrough = False Then
dblZ = dblZ + rngC.Value
End If
Next
ohne_strich = dblZ
ActiveSheet.Calculate
End Function
Hilfe wäre nett.
Grüße
Burghard

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Werte als Absoluter Werte in VBA Function addieren
08.08.2018 13:27:07
Hajo_Zi
abs(rngC)

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
AW: Werte als Absoluter Werte in VBA Function addieren
08.08.2018 18:38:07
Burghard
Hallo Hajo,
danke Dir, funktioniert wie gewünscht! :-)
Grüße
Burghard
Anzeige

253 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige